BBS in a Box 5

home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 5 / BBS in a Box -Volume V (BBS in a Box) (April 1992).iso / Files / Apple / Apple II TNs(Text).cpt / Apple II TNs(Text) / Misc / TN.Misc.002 < prev next >
MacBinary | 1989-11-15 | 30.4 KB | [TEXT/pdos]
open in:
MacOS 8.1 extracted |
Win98 extracted |
DOS extracted
view JSON data |
view as text

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: TN.Misc.002
Confidence	Program	Detection	Match Type	Support
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	GeoWorks GEOS Data `(other/geoWorksGEOSData)`	ext	Unsupported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, Wed Nov 15 12:35:18 1989, modified Wed Nov 15 12:35:18 1989, creator Apple ProDOS file system, type ASCII, 30484 bytes "TN.Misc.002" , at 0x7794 382 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[pdos]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0b 54 4e 2e 4d 69 73 | 63 2e 30 30 32 00 00 00 |..TN.Mis|c.002...|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 70 64 6f | 73 01 00 00 00 00 00 00 |.TEXTpdo|s.......|
|00000050| 00 00 00 00 00 77 14 00 | 00 01 7e a1 87 4e d6 a1 |.....w..|..~..N..|
|00000060| 87 4e d6 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |.N......|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 c6 e0 00 00 |........|........|
|00000080| 41 70 70 6c 65 20 49 49 | 0d 54 65 63 68 6e 69 63 |Apple II|.Technic|
|00000090| 61 6c 20 4e 6f 74 65 73 | 0d 5f 5f 5f 5f 5f 5f 5f |al Notes|._______|
|000000a0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000000b0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000000c0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000000d0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|000000e0| 5f 5f 5f 5f 5f 5f 0d 20 | 20 20 20 20 20 20 20 20 |______. |        |
|000000f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000100| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000110| 20 20 20 20 20 20 20 20 | 20 44 65 76 65 6c 6f 70 |        | Develop|
|00000120| 65 72 20 54 65 63 68 6e | 69 63 61 6c 20 53 75 70 |er Techn|ical Sup|
|00000130| 70 6f 72 74 0d 0d 0d 41 | 70 70 6c 65 20 49 49 20 |port...A|pple II |
|00000140| 4d 69 73 63 65 6c 6c 61 | 6e 65 6f 75 73 0d 23 32 |Miscella|neous.#2|
|00000150| 3a 20 20 20 20 41 70 70 | 6c 65 20 49 49 20 46 61 |:    App|le II Fa|
|00000160| 6d 69 6c 79 20 49 64 65 | 6e 74 69 66 69 63 61 74 |mily Ide|ntificat|
|00000170| 69 6f 6e 20 52 6f 75 74 | 69 6e 65 73 20 32 2e 31 |ion Rout|ines 2.1|
|00000180| 0d 0d 52 65 76 69 73 65 | 64 20 62 79 3a 20 20 20 |..Revise|d by:   |
|00000190| 20 4d 61 74 74 20 44 65 | 61 74 68 65 72 61 67 65 | Matt De|atherage|
|000001a0| 20 26 20 4b 65 69 74 68 | 20 52 6f 6c 6c 69 6e 20 | & Keith| Rollin |
|000001b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000001c0| 20 20 4e 6f 76 65 6d 62 | 65 72 20 31 39 38 38 0d |  Novemb|er 1988.|
|000001d0| 52 65 76 69 73 65 64 20 | 62 79 3a 20 20 20 20 50 |Revised |by:    P|
|000001e0| 65 74 65 20 4d 63 44 6f | 6e 61 6c 64 20 20 20 20 |ete McDo|nald    |
|000001f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000200| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000210| 20 4a 61 6e 75 61 72 79 | 20 31 39 38 36 0d 0d 54 | January| 1986..T|
|00000220| 68 69 73 20 54 65 63 68 | 6e 69 63 61 6c 20 4e 6f |his Tech|nical No|
|00000230| 74 65 20 70 72 65 73 65 | 6e 74 73 20 61 20 6e 65 |te prese|nts a ne|
|00000240| 77 20 76 65 72 73 69 6f | 6e 20 6f 66 20 74 68 65 |w versio|n of the|
|00000250| 20 41 70 70 6c 65 20 49 | 49 20 46 61 6d 69 6c 79 | Apple I|I Family|
|00000260| 20 0d 49 64 65 6e 74 69 | 66 69 63 61 74 69 6f 6e | .Identi|fication|
|00000270| 20 52 6f 75 74 69 6e 65 | 2c 20 61 20 73 61 6d 70 | Routine|, a samp|
|00000280| 6c 65 20 70 69 65 63 65 | 20 6f 66 20 63 6f 64 65 |le piece| of code|
|00000290| 20 77 68 69 63 68 20 73 | 68 6f 77 73 20 68 6f 77 | which s|hows how|
|000002a0| 20 74 6f 20 69 64 65 6e | 74 69 66 79 20 0d 76 61 | to iden|tify .va|
|000002b0| 72 69 6f 75 73 20 41 70 | 70 6c 65 20 49 49 20 63 |rious Ap|ple II c|
|000002c0| 6f 6d 70 75 74 65 72 73 | 20 61 6e 64 20 74 68 65 |omputers| and the|
|000002d0| 69 72 20 6d 65 6d 6f 72 | 79 20 63 6f 6e 66 69 67 |ir memor|y config|
|000002e0| 75 72 61 74 69 6f 6e 73 | 2e 0d 5f 5f 5f 5f 5f 5f |urations|..______|
|000002f0| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000300| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000310| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000320| 5f 5f 5f 5f 5f 5f 5f 5f | 5f 5f 5f 5f 5f 5f 5f 5f |________|________|
|00000330| 5f 5f 5f 5f 5f 5f 5f 0d | 0d 0d 57 68 79 20 49 64 |_______.|..Why Id|
|00000340| 65 6e 74 69 66 69 63 61 | 74 69 6f 6e 20 52 6f 75 |entifica|tion Rou|
|00000350| 74 69 6e 65 73 3f 0d 0d | 41 6c 74 68 6f 75 67 68 |tines?..|Although|
|00000360| 20 77 65 20 70 72 65 73 | 65 6e 74 20 74 68 65 20 | we pres|ent the |
|00000370| 41 70 70 6c 65 20 49 49 | 20 66 61 6d 69 6c 79 20 |Apple II| family |
|00000380| 69 64 65 6e 74 69 66 69 | 63 61 74 69 6f 6e 20 62 |identifi|cation b|
|00000390| 79 74 65 73 20 69 6e 20 | 41 70 70 6c 65 20 49 49 |ytes in |Apple II|
|000003a0| 20 0d 4d 69 73 63 65 6c | 6c 61 6e 65 6f 75 73 20 | .Miscel|laneous |
|000003b0| 54 65 63 68 6e 69 63 61 | 6c 20 4e 6f 74 65 20 23 |Technica|l Note #|
|000003c0| 37 2c 20 6d 61 6e 79 20 | 70 65 6f 70 6c 65 20 77 |7, many |people w|
|000003d0| 6f 75 6c 64 20 70 72 65 | 66 65 72 20 61 20 72 6f |ould pre|fer a ro|
|000003e0| 75 74 69 6e 65 20 74 68 | 65 79 20 63 61 6e 20 0d |utine th|ey can .|
|000003f0| 73 69 6d 70 6c 79 20 70 | 6c 75 67 20 69 6e 74 6f |simply p|lug into|
|00000400| 20 74 68 65 69 72 20 6f | 77 6e 20 70 72 6f 67 72 | their o|wn progr|
|00000410| 61 6d 20 61 6e 64 20 63 | 61 6c 6c 2e 20 20 49 6e |am and c|all.  In|
|00000420| 20 61 64 64 69 74 69 6f | 6e 2c 20 74 68 69 73 20 | additio|n, this |
|00000430| 72 6f 75 74 69 6e 65 20 | 73 65 72 76 65 73 20 0d |routine |serves .|
|00000440| 61 73 20 61 20 73 6d 61 | 6c 6c 20 70 69 65 63 65 |as a sma|ll piece|
|00000450| 20 6f 66 20 73 61 6d 70 | 6c 65 20 63 6f 64 65 2c | of samp|le code,|
|00000460| 20 61 6e 64 20 74 68 65 | 72 65 20 69 73 20 6e 6f | and the|re is no|
|00000470| 20 72 65 61 73 6f 6e 20 | 66 6f 72 20 79 6f 75 20 | reason |for you |
|00000480| 74 6f 20 72 65 69 6e 76 | 65 6e 74 20 0d 74 68 65 |to reinv|ent .the|
|00000490| 20 77 68 65 65 6c 2e 0d | 0d 4d 6f 73 74 20 6f 66 | wheel..|.Most of|
|000004a0| 20 74 68 65 20 69 6e 74 | 65 72 65 73 74 69 6e 67 | the int|eresting|
|000004b0| 20 70 61 72 74 20 6f 66 | 20 74 68 65 20 72 6f 75 | part of| the rou|
|000004c0| 74 69 6e 65 20 63 6f 6e | 73 69 73 74 73 20 6f 66 |tine con|sists of|
|000004d0| 20 69 64 65 6e 74 69 66 | 79 69 6e 67 20 74 68 65 | identif|ying the|
|000004e0| 20 6d 65 6d 6f 72 79 20 | 0d 63 6f 6e 66 69 67 75 | memory |.configu|
|000004f0| 72 61 74 69 6f 6e 20 6f | 66 20 74 68 65 20 6d 61 |ration o|f the ma|
|00000500| 63 68 69 6e 65 2e 20 20 | 4f 6e 20 61 6e 20 41 70 |chine.  |On an Ap|
|00000510| 70 6c 65 20 49 49 65 2c | 20 74 68 65 20 72 6f 75 |ple IIe,| the rou|
|00000520| 74 69 6e 65 20 6d 6f 76 | 65 73 20 63 6f 64 65 20 |tine mov|es code |
|00000530| 69 6e 74 6f 20 0d 74 68 | 65 20 7a 65 72 6f 20 70 |into .th|e zero p|
|00000540| 61 67 65 20 74 6f 20 74 | 65 73 74 20 66 6f 72 20 |age to t|est for |
|00000550| 74 68 65 20 70 72 65 73 | 65 6e 63 65 20 6f 66 20 |the pres|ence of |
|00000560| 61 75 78 69 6c 69 61 72 | 79 20 6d 65 6d 6f 72 79 |auxiliar|y memory|
|00000570| 2e 20 20 28 41 20 49 49 | 65 20 77 69 74 68 20 61 |.  (A II|e with a|
|00000580| 20 0d 6e 6f 6e 2d 65 78 | 74 65 6e 64 65 64 20 38 | .non-ex|tended 8|
|00000590| 30 2d 63 6f 6c 75 6d 6e | 20 63 61 72 64 20 69 73 |0-column| card is|
|000005a0| 20 61 20 63 6f 6e 66 69 | 67 75 72 61 74 69 6f 6e | a confi|guration|
|000005b0| 20 73 74 69 6c 6c 20 66 | 6f 75 6e 64 20 69 6e 20 | still f|ound in |
|000005c0| 6d 61 6e 79 20 73 63 68 | 6f 6f 6c 73 20 0d 74 68 |many sch|ools .th|
|000005d0| 72 6f 75 67 68 6f 75 74 | 20 74 68 65 20 63 6f 75 |roughout| the cou|
|000005e0| 6e 74 72 79 2e 29 0d 0d | 54 68 65 20 61 63 74 75 |ntry.)..|The actu|
|000005f0| 61 6c 20 69 64 65 6e 74 | 69 66 69 63 61 74 69 6f |al ident|ificatio|
|00000600| 6e 20 69 73 20 64 6f 6e | 65 20 62 79 20 61 20 74 |n is don|e by a t|
|00000610| 61 62 6c 65 2d 6c 6f 6f | 6b 75 70 20 6d 65 74 68 |able-loo|kup meth|
|00000620| 6f 64 2e 0d 0d 0d 57 68 | 61 74 20 74 68 65 20 52 |od....Wh|at the R|
|00000630| 6f 75 74 69 6e 65 20 52 | 65 74 75 72 6e 73 0d 0d |outine R|eturns..|
|00000640| 54 68 69 73 20 76 65 72 | 73 69 6f 6e 20 28 32 2e |This ver|sion (2.|
|00000650| 31 29 20 6f 66 20 74 68 | 65 20 69 64 65 6e 74 69 |1) of th|e identi|
|00000660| 66 69 63 61 74 69 6f 6e | 20 72 6f 75 74 69 6e 65 |fication| routine|
|00000670| 20 72 65 74 75 72 6e 73 | 20 73 65 76 65 72 61 6c | returns| several|
|00000680| 20 74 68 69 6e 67 73 3a | 0d 0d 6f 20 20 20 20 41 | things:|..o    A|
|00000690| 20 6d 61 63 68 69 6e 65 | 20 62 79 74 65 2c 20 63 | machine| byte, c|
|000006a0| 6f 6e 74 61 69 6e 69 6e | 67 20 6f 6e 65 20 6f 66 |ontainin|g one of|
|000006b0| 20 73 65 76 65 6e 20 76 | 61 6c 75 65 73 3a 0d 20 | seven v|alues:. |
|000006c0| 20 20 20 20 24 30 30 20 | 3d 20 55 6e 6b 6e 6f 77 |    $00 |= Unknow|
|000006d0| 6e 20 6d 61 63 68 69 6e | 65 0d 20 20 20 20 20 24 |n machin|e.     $|
|000006e0| 30 31 20 3d 20 41 70 70 | 6c 65 20 5d 5b 0d 20 20 |01 = App|le ][.  |
|000006f0| 20 20 20 24 30 32 20 3d | 20 41 70 70 6c 65 20 5d |   $02 =| Apple ]|
|00000700| 5b 2b 0d 20 20 20 20 20 | 24 30 33 20 3d 20 41 70 |[+.     |$03 = Ap|
|00000710| 70 6c 65 20 2f 2f 2f 20 | 69 6e 20 65 6d 75 6c 61 |ple /// |in emula|
|00000720| 74 69 6f 6e 20 6d 6f 64 | 65 0d 20 20 20 20 20 24 |tion mod|e.     $|
|00000730| 30 34 20 3d 20 41 70 70 | 6c 65 20 49 49 65 0d 20 |04 = App|le IIe. |
|00000740| 20 20 20 20 24 30 35 20 | 3d 20 41 70 70 6c 65 20 |    $05 |= Apple |
|00000750| 49 49 63 0d 0d 20 20 20 | 20 20 49 6e 20 61 64 64 |IIc..   |  In add|
|00000760| 69 74 69 6f 6e 2c 20 69 | 66 20 74 68 65 20 68 69 |ition, i|f the hi|
|00000770| 67 68 20 62 69 74 20 6f | 66 20 74 68 65 20 62 79 |gh bit o|f the by|
|00000780| 74 65 20 69 73 20 73 65 | 74 2c 20 74 68 65 20 6d |te is se|t, the m|
|00000790| 61 63 68 69 6e 65 20 69 | 73 20 61 20 0d 20 20 20 |achine i|s a .   |
|000007a0| 20 20 49 49 47 53 20 6f | 72 20 65 71 75 69 76 61 |  IIGS o|r equiva|
|000007b0| 6c 65 6e 74 2e 20 20 46 | 6f 72 20 61 6c 6c 20 63 |lent.  F|or all c|
|000007c0| 75 72 72 65 6e 74 20 41 | 70 70 6c 65 20 49 49 47 |urrent A|pple IIG|
|000007d0| 53 20 63 6f 6d 70 75 74 | 65 72 73 2c 20 74 68 65 |S comput|ers, the|
|000007e0| 20 0d 20 20 20 20 20 76 | 61 6c 75 65 20 72 65 74 | .     v|alue ret|
|000007f0| 75 72 6e 65 64 20 69 6e | 20 6d 61 63 68 69 6e 65 |urned in| machine|
|00000800| 20 69 73 20 24 38 34 20 | 28 68 69 67 68 20 62 69 | is $84 |(high bi|
|00000810| 74 20 73 65 74 20 74 6f | 20 73 69 67 6e 69 66 79 |t set to| signify|
|00000820| 20 41 70 70 6c 65 20 0d | 20 20 20 20 20 49 49 47 | Apple .|     IIG|
|00000830| 53 20 61 6e 64 20 24 30 | 34 20 62 65 63 61 75 73 |S and $0|4 becaus|
|00000840| 65 20 69 74 20 6d 61 74 | 63 68 65 73 20 74 68 65 |e it mat|ches the|
|00000850| 20 49 44 20 62 79 74 65 | 73 20 6f 66 20 61 6e 20 | ID byte|s of an |
|00000860| 65 6e 68 61 6e 63 65 64 | 20 41 70 70 6c 65 20 0d |enhanced| Apple .|
|00000870| 20 20 20 20 20 49 49 65 | 29 2e 0d 6f 20 20 20 20 |     IIe|)..o    |
|00000880| 41 20 52 4f 4d 6c 65 76 | 65 6c 20 62 79 74 65 2c |A ROMlev|el byte,|
|00000890| 20 69 6e 64 69 63 61 74 | 69 6e 67 20 74 68 65 20 | indicat|ing the |
|000008a0| 72 65 76 69 73 69 6f 6e | 20 6f 66 20 74 68 65 20 |revision| of the |
|000008b0| 66 69 72 6d 77 61 72 65 | 20 69 6e 20 74 68 65 20 |firmware| in the |
|000008c0| 0d 20 20 20 20 20 6d 61 | 63 68 69 6e 65 2e 20 20 |.     ma|chine.  |
|000008d0| 46 6f 72 20 65 78 61 6d | 70 6c 65 2c 20 74 68 65 |For exam|ple, the|
|000008e0| 72 65 20 61 72 65 20 63 | 75 72 72 65 6e 74 6c 79 |re are c|urrently|
|000008f0| 20 66 69 76 65 20 72 65 | 76 69 73 69 6f 6e 73 20 | five re|visions |
|00000900| 6f 66 20 74 68 65 20 0d | 20 20 20 20 20 49 49 63 |of the .|     IIc|
|00000910| 2c 20 74 77 6f 20 6f 66 | 20 74 68 65 20 49 49 65 |, two of| the IIe|
|00000920| 20 28 75 6e 65 6e 68 61 | 6e 63 65 64 20 61 6e 64 | (unenha|nced and|
|00000930| 20 65 6e 68 61 6e 63 65 | 64 29 2c 20 61 6e 64 20 | enhance|d), and |
|00000940| 74 77 6f 20 76 65 72 73 | 69 6f 6e 73 20 6f 66 20 |two vers|ions of |
|00000950| 0d 20 20 20 20 20 74 68 | 65 20 49 49 47 53 20 52 |.     th|e IIGS R|
|00000960| 4f 4d 20 28 74 68 65 72 | 65 20 77 69 6c 6c 20 61 |OM (ther|e will a|
|00000970| 6c 77 61 79 73 20 62 65 | 20 73 6f 6d 65 20 6f 77 |lways be| some ow|
|00000980| 6e 65 72 73 20 77 68 6f | 20 68 61 76 65 20 6e 6f |ners who| have no|
|00000990| 74 20 79 65 74 20 0d 20 | 20 20 20 20 75 70 67 72 |t yet . |    upgr|
|000009a0| 61 64 65 64 29 2e 20 20 | 54 68 65 73 65 20 76 65 |aded).  |These ve|
|000009b0| 72 73 69 6f 6e 73 20 61 | 72 65 20 69 64 65 6e 74 |rsions a|re ident|
|000009c0| 69 66 69 65 64 20 73 74 | 61 72 74 69 6e 67 20 61 |ified st|arting a|
|000009d0| 74 20 24 30 31 20 66 6f | 72 20 74 68 65 20 0d 20 |t $01 fo|r the . |
|000009e0| 20 20 20 20 65 61 72 6c | 69 65 73 74 2e 20 20 54 |    earl|iest.  T|
|000009f0| 68 65 72 65 66 6f 72 65 | 2c 20 74 68 65 20 63 75 |herefore|, the cu|
|00000a00| 72 72 65 6e 74 20 49 49 | 63 20 77 69 6c 6c 20 72 |rrent II|c will r|
|00000a10| 65 74 75 72 6e 20 52 4f | 4d 6c 65 76 65 6c 20 3d |eturn RO|Mlevel =|
|00000a20| 20 24 30 34 2c 20 0d 20 | 20 20 20 20 74 68 65 20 | $04, . |    the |
|00000a30| 63 75 72 72 65 6e 74 20 | 49 49 47 53 20 77 69 6c |current |IIGS wil|
|00000a40| 6c 20 72 65 74 75 72 6e | 20 52 4f 4d 6c 65 76 65 |l return| ROMleve|
|00000a50| 6c 20 3d 20 24 30 32 2c | 20 65 74 63 2e 20 20 54 |l = $02,| etc.  T|
|00000a60| 68 65 20 72 6f 75 74 69 | 6e 65 20 0d 20 20 20 20 |he routi|ne .    |
|00000a70| 20 77 69 6c 6c 20 61 6c | 73 6f 20 72 65 74 75 72 | will al|so retur|
|00000a80| 6e 20 63 6f 72 72 65 63 | 74 20 76 61 6c 75 65 73 |n correc|t values|
|00000a90| 20 66 6f 72 20 66 75 74 | 75 72 65 20 76 65 72 73 | for fut|ure vers|
|00000aa0| 69 6f 6e 73 20 6f 66 20 | 74 68 65 20 49 49 47 53 |ions of |the IIGS|
|00000ab0| 2c 20 0d 20 20 20 20 20 | 61 73 20 61 20 63 6f 6e |, .     |as a con|
|00000ac0| 76 65 6e 74 69 6f 6e 20 | 68 61 73 20 62 65 65 6e |vention |has been|
|00000ad0| 20 65 73 74 61 62 6c 69 | 73 68 65 64 20 66 6f 72 | establi|shed for|
|00000ae0| 20 66 75 74 75 72 65 20 | 52 4f 4d 20 76 65 72 73 | future |ROM vers|
|00000af0| 69 6f 6e 73 20 6f 66 20 | 0d 20 20 20 20 20 74 68 |ions of |.     th|
|00000b00| 61 74 20 6d 61 63 68 69 | 6e 65 2e 0d 6f 20 20 20 |at machi|ne..o   |
|00000b10| 20 41 20 6d 65 6d 6f 72 | 79 20 62 79 74 65 2c 20 | A memor|y byte, |
|00000b20| 63 6f 6e 74 61 69 6e 69 | 6e 67 20 74 68 65 20 61 |containi|ng the a|
|00000b30| 6d 6f 75 6e 74 20 6f 66 | 20 6d 65 6d 6f 72 79 20 |mount of| memory |
|00000b40| 69 6e 20 74 68 65 20 6d | 61 63 68 69 6e 65 2e 20 |in the m|achine. |
|00000b50| 20 0d 20 20 20 20 20 54 | 68 69 73 20 62 79 74 65 | .     T|his byte|
|00000b60| 20 6f 6e 6c 79 20 68 61 | 73 20 66 6f 75 72 20 76 | only ha|s four v|
|00000b70| 61 6c 75 65 73 2d 2d 30 | 20 28 75 6e 64 65 66 69 |alues--0| (undefi|
|00000b80| 6e 65 64 29 2c 20 34 38 | 2c 20 36 34 2c 20 61 6e |ned), 48|, 64, an|
|00000b90| 64 20 31 32 38 2e 20 20 | 0d 20 20 20 20 20 45 78 |d 128.  |.     Ex|
|00000ba0| 74 72 61 20 6d 65 6d 6f | 72 79 20 69 6e 20 61 6e |tra memo|ry in an|
|00000bb0| 20 41 70 70 6c 65 20 49 | 49 47 53 2c 20 6f 72 20 | Apple I|IGS, or |
|00000bc0| 65 78 74 72 61 20 6d 65 | 6d 6f 72 79 20 69 6e 20 |extra me|mory in |
|00000bd0| 61 6e 20 41 70 70 6c 65 | 20 49 49 65 20 6f 72 20 |an Apple| IIe or |
|00000be0| 0d 20 20 20 20 20 49 49 | 63 20 4d 65 6d 6f 72 79 |.     II|c Memory|
|00000bf0| 20 45 78 70 61 6e 73 69 | 6f 6e 20 63 61 72 64 2c | Expansi|on card,|
|00000c00| 20 69 73 20 6e 6f 74 20 | 69 6e 63 6c 75 64 65 64 | is not |included|
|00000c10| 2e 20 20 50 72 6f 67 72 | 61 6d 73 20 6d 75 73 74 |.  Progr|ams must|
|00000c20| 20 74 61 6b 65 20 0d 20 | 20 20 20 20 73 70 65 63 | take . |    spec|
|00000c30| 69 61 6c 20 63 6f 6e 73 | 69 64 65 72 61 74 69 6f |ial cons|ideratio|
|00000c40| 6e 73 20 74 6f 20 75 73 | 65 20 74 68 61 74 20 6d |ns to us|e that m|
|00000c50| 65 6d 6f 72 79 20 28 69 | 66 20 61 76 61 69 6c 61 |emory (i|f availa|
|00000c60| 62 6c 65 29 2c 20 62 65 | 79 6f 6e 64 20 0d 20 20 |ble), be|yond .  |
|00000c70| 20 20 20 74 68 6f 73 65 | 20 63 6f 6e 73 69 64 65 |   those| conside|
|00000c80| 72 61 74 69 6f 6e 73 20 | 72 65 71 75 69 72 65 64 |rations |required|
|00000c90| 20 74 6f 20 75 73 65 20 | 74 68 65 20 6e 6f 72 6d | to use |the norm|
|00000ca0| 61 6c 20 31 32 38 4b 20 | 6f 66 20 74 6f 64 61 79 |al 128K |of today|
|00000cb0| 27 73 20 0d 20 20 20 20 | 20 49 49 65 20 61 6e 64 |'s .    | IIe and|
|00000cc0| 20 49 49 63 2e 0d 6f 20 | 20 20 20 49 66 20 72 75 | IIc..o |   If ru|
|00000cd0| 6e 6e 69 6e 67 20 6f 6e | 20 61 6e 20 41 70 70 6c |nning on| an Appl|
|00000ce0| 65 20 49 49 47 53 2c 20 | 74 68 72 65 65 20 77 6f |e IIGS, |three wo|
|00000cf0| 72 64 2d 6c 65 6e 67 74 | 68 20 66 69 65 6c 64 73 |rd-lengt|h fields|
|00000d00| 20 61 72 65 20 61 6c 73 | 6f 20 0d 20 20 20 20 20 | are als|o .     |
|00000d10| 72 65 74 75 72 6e 65 64 | 2e 20 20 54 68 65 73 65 |returned|.  These|
|00000d20| 20 61 72 65 20 74 68 65 | 20 63 6f 6e 74 65 6e 74 | are the| content|
|00000d30| 73 20 6f 66 20 74 68 65 | 20 72 65 67 69 73 74 65 |s of the| registe|
|00000d40| 72 73 20 61 73 20 72 65 | 74 75 72 6e 65 64 20 62 |rs as re|turned b|
|00000d50| 79 20 0d 20 20 20 20 20 | 74 68 65 20 49 44 20 72 |y .     |the ID r|
|00000d60| 6f 75 74 69 6e 65 20 69 | 6e 20 74 68 65 20 49 49 |outine i|n the II|
|00000d70| 47 53 20 52 4f 4d 2c 20 | 61 6e 64 20 74 68 65 79 |GS ROM, |and they|
|00000d80| 20 69 6e 64 69 63 61 74 | 65 20 73 65 76 65 72 61 | indicat|e severa|
|00000d90| 6c 20 74 68 69 6e 67 73 | 20 0d 20 20 20 20 20 61 |l things| .     a|
|00000da0| 62 6f 75 74 20 74 68 65 | 20 6d 61 63 68 69 6e 65 |bout the| machine|
|00000db0| 2e 20 20 53 65 65 20 41 | 70 70 6c 65 20 49 49 20 |.  See A|pple II |
|00000dc0| 4d 69 73 63 65 6c 6c 61 | 6e 65 6f 75 73 20 54 65 |Miscella|neous Te|
|00000dd0| 63 68 6e 69 63 61 6c 20 | 4e 6f 74 65 20 23 37 20 |chnical |Note #7 |
|00000de0| 0d 20 20 20 20 20 66 6f | 72 20 6d 6f 72 65 20 64 |.     fo|r more d|
|00000df0| 65 74 61 69 6c 73 2e 0d | 0d 49 6e 20 61 64 64 69 |etails..|.In addi|
|00000e00| 74 69 6f 6e 20 74 6f 20 | 74 68 65 73 65 20 66 65 |tion to |these fe|
|00000e10| 61 74 75 72 65 73 2c 20 | 6d 6f 73 74 20 6f 66 20 |atures, |most of |
|00000e20| 74 68 65 20 61 64 64 72 | 65 73 73 69 6e 67 20 64 |the addr|essing d|
|00000e30| 6f 6e 65 20 69 6e 20 74 | 68 65 20 72 6f 75 74 69 |one in t|he routi|
|00000e40| 6e 65 20 69 73 20 0d 62 | 79 20 6c 61 62 65 6c 2e |ne is .b|y label.|
|00000e50| 20 20 49 66 20 79 6f 75 | 20 77 69 73 68 20 74 68 |  If you| wish th|
|00000e60| 69 6e 67 73 20 74 6f 20 | 62 65 20 73 74 6f 72 65 |ings to |be store|
|00000e70| 64 20 69 6e 20 64 69 66 | 66 65 72 65 6e 74 20 70 |d in dif|ferent p|
|00000e80| 6c 61 63 65 73 2c 20 73 | 69 6d 70 6c 79 20 0d 63 |laces, s|imply .c|
|00000e90| 68 61 6e 67 69 6e 67 20 | 74 68 65 20 6c 61 62 65 |hanging |the labe|
|00000ea0| 6c 73 20 77 69 6c 6c 20 | 6f 66 74 65 6e 20 64 6f |ls will |often do|
|00000eb0| 20 69 74 2e 0d 0d 0d 4c | 69 6d 69 74 61 74 69 6f | it....L|imitatio|
|00000ec0| 6e 73 20 61 6e 64 20 49 | 6d 70 72 6f 76 65 6d 65 |ns and I|mproveme|
|00000ed0| 6e 74 73 0d 0d 41 73 20 | 73 61 6d 70 6c 65 20 63 |nts..As |sample c|
|00000ee0| 6f 64 65 2c 20 79 6f 75 | 20 6d 69 67 68 74 20 68 |ode, you| might h|
|00000ef0| 61 76 65 20 61 6c 72 65 | 61 64 79 20 67 75 65 73 |ave alre|ady gues|
|00000f00| 73 65 64 20 74 68 61 74 | 20 74 68 69 73 20 69 73 |sed that| this is|
|00000f10| 20 6e 6f 74 20 74 68 65 | 20 6d 6f 73 74 20 0d 63 | not the| most .c|
|00000f20| 6f 6d 70 61 63 74 2c 20 | 65 66 66 69 63 69 65 6e |ompact, |efficien|
|00000f30| 74 20 77 61 79 20 6f 66 | 20 69 64 65 6e 74 69 66 |t way of| identif|
|00000f40| 79 69 6e 67 20 74 68 65 | 73 65 20 6d 61 63 68 69 |ying the|se machi|
|00000f50| 6e 65 73 2e 20 20 53 6f | 6d 65 20 69 6d 70 72 6f |nes.  So|me impro|
|00000f60| 76 65 6d 65 6e 74 73 20 | 79 6f 75 20 0d 6d 69 67 |vements |you .mig|
|00000f70| 68 74 20 69 6e 63 6f 72 | 70 6f 72 61 74 65 20 69 |ht incor|porate i|
|00000f80| 66 20 75 73 69 6e 67 20 | 74 68 65 73 65 20 72 6f |f using |these ro|
|00000f90| 75 74 69 6e 65 73 20 69 | 6e 63 6c 75 64 65 3a 0d |utines i|nclude:.|
|00000fa0| 0d 6f 20 20 20 20 49 66 | 20 79 6f 75 20 61 72 65 |.o    If| you are|
|00000fb0| 20 72 75 6e 6e 69 6e 67 | 20 75 6e 64 65 72 20 50 | running| under P|
|00000fc0| 72 6f 44 4f 53 2c 20 79 | 6f 75 20 63 61 6e 20 72 |roDOS, y|ou can r|
|00000fd0| 65 6d 6f 76 65 20 74 68 | 65 20 73 65 63 74 69 6f |emove th|e sectio|
|00000fe0| 6e 20 74 68 61 74 20 0d | 20 20 20 20 20 64 65 74 |n that .|     det|
|00000ff0| 65 72 6d 69 6e 65 73 20 | 68 6f 77 20 6d 75 63 68 |ermines |how much|
|00001000| 20 6d 65 6d 6f 72 79 20 | 69 73 20 69 6e 20 74 68 | memory |is in th|
|00001010| 65 20 6d 61 63 68 69 6e | 65 20 28 73 74 61 72 74 |e machin|e (start|
|00001020| 69 6e 67 20 61 74 20 65 | 78 69 74 2c 20 0d 20 20 |ing at e|xit, .  |
|00001030| 20 20 20 6c 69 6e 65 20 | 31 32 37 29 2c 20 73 69 |   line |127), si|
|00001040| 6e 63 65 20 74 68 65 20 | 4d 41 43 48 49 44 20 62 |nce the |MACHID b|
|00001050| 79 74 65 20 28 61 74 20 | 24 42 46 39 38 29 20 69 |yte (at |$BF98) i|
|00001060| 6e 20 50 72 6f 44 4f 53 | 20 61 6c 72 65 61 64 79 |n ProDOS| already|
|00001070| 20 0d 20 20 20 20 20 63 | 6f 6e 74 61 69 6e 73 20 | .     c|ontains |
|00001080| 74 68 69 73 20 69 6e 66 | 6f 72 6d 61 74 69 6f 6e |this inf|ormation|
|00001090| 20 66 6f 72 20 79 6f 75 | 2e 20 20 54 68 69 73 20 | for you|.  This |
|000010a0| 63 68 61 6e 67 65 20 77 | 6f 75 6c 64 20 63 75 74 |change w|ould cut|
|000010b0| 20 74 68 65 20 0d 20 20 | 20 20 20 72 6f 75 74 69 | the .  |   routi|
|000010c0| 6e 65 20 64 6f 77 6e 20 | 74 6f 20 6c 65 73 73 20 |ne down |to less |
|000010d0| 74 68 61 6e 20 6f 6e 65 | 20 70 61 67 65 20 6f 66 |than one| page of|
|000010e0| 20 6d 65 6d 6f 72 79 2e | 0d 6f 20 20 20 20 49 66 | memory.|.o    If|
|000010f0| 20 79 6f 75 20 6b 6e 6f | 77 20 74 68 65 20 52 4f | you kno|w the RO|
|00001100| 4d 20 69 73 20 73 77 69 | 74 63 68 65 64 20 69 6e |M is swi|tched in|
|00001110| 20 77 68 65 6e 20 79 6f | 75 20 63 61 6c 6c 20 74 | when yo|u call t|
|00001120| 68 65 20 72 6f 75 74 69 | 6e 65 2c 20 79 6f 75 20 |he routi|ne, you |
|00001130| 0d 20 20 20 20 20 63 61 | 6e 20 72 65 6d 6f 76 65 |.     ca|n remove|
|00001140| 20 74 68 65 20 73 65 63 | 74 69 6f 6e 73 20 77 68 | the sec|tions wh|
|00001150| 69 63 68 20 73 61 76 65 | 20 61 6e 64 20 72 65 73 |ich save| and res|
|00001160| 74 6f 72 65 20 74 68 65 | 20 6c 61 6e 67 75 61 67 |tore the| languag|
|00001170| 65 20 63 61 72 64 20 0d | 20 20 20 20 20 73 74 61 |e card .|     sta|
|00001180| 74 65 2e 20 20 42 65 20 | 63 61 72 65 66 75 6c 20 |te.  Be |careful |
|00001190| 69 6e 20 64 6f 69 6e 67 | 20 73 6f 2c 20 68 6f 77 |in doing| so, how|
|000011a0| 65 76 65 72 2c 20 62 65 | 63 61 75 73 65 20 74 68 |ever, be|cause th|
|000011b0| 65 20 6d 65 6d 6f 72 79 | 2d 0d 20 20 20 20 20 64 |e memory|-.     d|
|000011c0| 65 74 65 72 6d 69 6e 61 | 74 69 6f 6e 20 72 6f 75 |etermina|tion rou|
|000011d0| 74 69 6e 65 73 20 73 77 | 69 74 63 68 20 6f 75 74 |tines sw|itch out|
|000011e0| 20 74 68 65 20 52 4f 4d | 20 74 6f 20 73 65 65 20 | the ROM| to see |
|000011f0| 69 66 20 61 20 6c 61 6e | 67 75 61 67 65 20 0d 20 |if a lan|guage . |
|00001200| 20 20 20 20 63 61 72 64 | 20 65 78 69 73 74 73 2e |    card| exists.|
|00001210| 0d 6f 20 20 20 20 49 66 | 20 79 6f 75 20 6e 65 65 |.o    If| you nee|
|00001220| 64 20 74 6f 20 6b 6e 6f | 77 20 69 66 20 61 20 49 |d to kno|w if a I|
|00001230| 49 65 20 69 73 20 61 20 | 36 34 4b 20 6d 61 63 68 |Ie is a |64K mach|
|00001240| 69 6e 65 20 77 69 74 68 | 20 61 20 6e 6f 6e 2d 65 |ine with| a non-e|
|00001250| 78 74 65 6e 64 65 64 20 | 0d 20 20 20 20 20 38 30 |xtended |.     80|
|00001260| 2d 63 6f 6c 75 6d 6e 20 | 63 61 72 64 2c 20 79 6f |-column |card, yo|
|00001270| 75 20 6d 61 79 20 70 75 | 74 20 79 6f 75 72 20 6f |u may pu|t your o|
|00001280| 77 6e 20 69 64 65 6e 74 | 69 66 79 69 6e 67 20 72 |wn ident|ifying r|
|00001290| 6f 75 74 69 6e 65 73 20 | 69 6e 20 61 66 74 65 72 |outines |in after|
|000012a0| 20 0d 20 20 20 20 20 6c | 69 6e 65 20 32 38 34 2e | .     l|ine 284.|
|000012b0| 20 20 4e 6f 41 75 78 20 | 69 73 20 6f 6e 6c 79 20 |  NoAux |is only |
|000012c0| 72 65 61 63 68 65 64 20 | 69 66 20 74 68 65 72 65 |reached |if there|
|000012d0| 20 69 73 20 61 6e 20 38 | 30 2d 63 6f 6c 75 6d 6e | is an 8|0-column|
|000012e0| 20 63 61 72 64 20 62 75 | 74 20 0d 20 20 20 20 20 | card bu|t .     |
|000012f0| 6f 6e 6c 79 20 36 34 4b | 20 6f 66 20 6d 65 6d 6f |only 64K| of memo|
|00001300| 72 79 2e 0d 0d 0d 48 6f | 77 20 49 74 20 57 6f 72 |ry....Ho|w It Wor|
|00001310| 6b 73 0d 0d 54 68 65 20 | 69 64 65 6e 74 69 66 69 |ks..The |identifi|
|00001320| 63 61 74 69 6f 6e 20 72 | 6f 75 74 69 6e 65 20 64 |cation r|outine d|
|00001330| 6f 65 73 20 74 68 65 20 | 66 6f 6c 6c 6f 77 69 6e |oes the |followin|
|00001340| 67 20 74 68 69 6e 67 73 | 3a 0d 0d 6f 20 20 20 20 |g things|:..o    |
|00001350| 44 69 73 61 62 6c 65 73 | 20 69 6e 74 65 72 72 75 |Disables| interru|
|00001360| 70 74 73 0d 6f 20 20 20 | 20 53 61 76 65 73 20 66 |pts.o   | Saves f|
|00001370| 6f 75 72 20 62 79 74 65 | 73 20 66 72 6f 6d 20 74 |our byte|s from t|
|00001380| 68 65 20 6c 61 6e 67 75 | 61 67 65 20 63 61 72 64 |he langu|age card|
|00001390| 20 61 72 65 61 73 20 73 | 6f 20 74 68 65 79 20 6d | areas s|o they m|
|000013a0| 61 79 20 62 65 20 72 65 | 73 74 6f 72 65 64 20 0d |ay be re|stored .|
|000013b0| 20 20 20 20 20 6c 61 74 | 65 72 0d 6f 20 20 20 20 |     lat|er.o    |
|000013c0| 49 64 65 6e 74 69 66 69 | 65 73 20 61 6c 6c 20 6d |Identifi|es all m|
|000013d0| 61 63 68 69 6e 65 73 20 | 62 79 20 61 20 74 61 62 |achines |by a tab|
|000013e0| 6c 65 20 6c 6f 6f 6b 2d | 75 70 20 70 72 6f 63 65 |le look-|up proce|
|000013f0| 64 75 72 65 0d 6f 20 20 | 20 20 43 61 6c 6c 73 20 |dure.o  |  Calls |
|00001400| 31 36 2d 62 69 74 20 49 | 44 20 72 6f 75 74 69 6e |16-bit I|D routin|
|00001410| 65 20 74 6f 20 64 69 73 | 74 69 6e 67 75 69 73 68 |e to dis|tinguish|
|00001420| 20 49 49 47 53 20 66 72 | 6f 6d 20 6f 74 68 65 72 | IIGS fr|om other|
|00001430| 20 6d 61 63 68 69 6e 65 | 73 20 6f 66 20 61 6e 79 | machine|s of any|
|00001440| 20 0d 20 20 20 20 20 6b | 69 6e 64 2c 20 61 6e 64 | .     k|ind, and|
|00001450| 20 72 65 74 75 72 6e 73 | 20 76 61 6c 75 65 73 20 | returns| values |
|00001460| 69 6e 20 61 70 70 72 6f | 70 72 69 61 74 65 20 6c |in appro|priate l|
|00001470| 6f 63 61 74 69 6f 6e 73 | 20 69 66 20 49 49 47 53 |ocations| if IIGS|
|00001480| 20 49 44 20 72 6f 75 74 | 69 6e 65 20 0d 20 20 20 | ID rout|ine .   |
|00001490| 20 20 72 65 74 75 72 6e | 73 20 61 6e 79 20 75 73 |  return|s any us|
|000014a0| 65 66 75 6c 20 69 6e 66 | 6f 72 6d 61 74 69 6f 6e |eful inf|ormation|
|000014b0| 20 69 6e 20 74 68 65 20 | 72 65 67 69 73 74 65 72 | in the |register|
|000014c0| 73 0d 6f 20 20 20 20 49 | 64 65 6e 74 69 66 69 65 |s.o    I|dentifie|
|000014d0| 73 20 6d 65 6d 6f 72 79 | 20 63 6f 6e 66 69 67 75 |s memory| configu|
|000014e0| 72 61 74 69 6f 6e 3a 0d | 20 20 20 20 20 6f 20 20 |ration:.|     o  |
|000014f0| 20 20 49 66 20 41 70 70 | 6c 65 20 2f 2f 2f 20 65 |  If App|le /// e|
|00001500| 6d 75 6c 61 74 69 6f 6e | 2c 20 74 68 65 72 65 20 |mulation|, there |
|00001510| 69 73 20 34 38 4b 0d 20 | 20 20 20 20 6f 20 20 20 |is 48K. |    o   |
|00001520| 20 49 66 20 41 70 70 6c | 65 20 5d 5b 20 6f 72 20 | If Appl|e ][ or |
|00001530| 5d 5b 2b 2c 20 74 65 73 | 74 73 20 66 6f 72 20 70 |][+, tes|ts for p|
|00001540| 72 65 73 65 6e 63 65 20 | 6f 66 20 6c 61 6e 67 75 |resence |of langu|
|00001550| 61 67 65 20 63 61 72 64 | 20 61 6e 64 20 72 65 74 |age card| and ret|
|00001560| 75 72 6e 73 20 0d 20 20 | 20 20 20 20 20 20 20 20 |urns .  |        |
|00001570| 36 34 4b 20 69 66 20 70 | 72 65 73 65 6e 74 2c 20 |64K if p|resent, |
|00001580| 6f 74 68 65 72 77 69 73 | 65 2c 20 72 65 74 75 72 |otherwis|e, retur|
|00001590| 6e 73 20 34 38 4b 0d 20 | 20 20 20 20 6f 20 20 20 |ns 48K. |    o   |
|000015a0| 20 49 66 20 41 70 70 6c | 65 20 49 49 63 20 6f 72 | If Appl|e IIc or|
|000015b0| 20 49 49 47 53 2c 20 72 | 65 74 75 72 6e 73 20 31 | IIGS, r|eturns 1|
|000015c0| 32 38 4b 0d 20 20 20 20 | 20 6f 20 20 20 20 49 66 |28K.    | o    If|
|000015d0| 20 41 70 70 6c 65 20 49 | 49 65 2c 20 74 72 69 65 | Apple I|Ie, trie|
|000015e0| 73 20 74 6f 20 69 64 65 | 6e 74 69 66 79 20 61 75 |s to ide|ntify au|
|000015f0| 78 69 6c 69 61 72 79 20 | 6d 65 6d 6f 72 79 0d 20 |xiliary |memory. |
|00001600| 20 20 20 20 20 20 20 20 | 20 6f 20 20 20 20 49 66 |        | o    If|
|00001610| 20 72 65 61 64 69 6e 67 | 20 61 75 78 69 6c 69 61 | reading| auxilia|
|00001620| 72 79 20 6d 65 6d 6f 72 | 79 2c 20 69 74 20 6d 75 |ry memor|y, it mu|
|00001630| 73 74 20 62 65 20 74 68 | 65 72 65 0d 20 20 20 20 |st be th|ere.    |
|00001640| 20 20 20 20 20 20 6f 20 | 20 20 20 49 66 20 72 65 |      o |   If re|
|00001650| 61 64 69 6e 67 20 61 6c | 74 65 72 6e 61 74 65 20 |ading al|ternate |
|00001660| 7a 65 72 6f 20 70 61 67 | 65 2c 20 61 75 78 69 6c |zero pag|e, auxil|
|00001670| 69 61 72 79 20 6d 65 6d | 6f 72 79 20 69 73 20 70 |iary mem|ory is p|
|00001680| 72 65 73 65 6e 74 0d 20 | 20 20 20 20 20 20 20 20 |resent. |        |
|00001690| 20 6f 20 20 20 20 49 66 | 20 6e 6f 6e 65 20 6f 66 | o    If| none of|
|000016a0| 20 74 68 69 73 20 69 73 | 20 63 6f 6e 63 6c 75 73 | this is| conclus|
|000016b0| 69 76 65 3a 0d 20 20 20 | 20 20 20 20 20 20 20 20 |ive:.   |        |
|000016c0| 20 20 20 20 6f 20 20 20 | 20 45 78 63 68 61 6e 67 |    o   | Exchang|
|000016d0| 65 73 20 61 20 73 65 63 | 74 69 6f 6e 20 6f 66 20 |es a sec|tion of |
|000016e0| 74 68 65 20 7a 65 72 6f | 20 70 61 67 65 20 77 69 |the zero| page wi|
|000016f0| 74 68 20 61 20 73 65 63 | 74 69 6f 6e 20 6f 66 20 |th a sec|tion of |
|00001700| 63 6f 64 65 20 0d 20 20 | 20 20 20 20 20 20 20 20 |code .  |        |
|00001710| 20 20 20 20 20 20 20 20 | 20 20 74 68 61 74 20 73 |        |  that s|
|00001720| 77 69 74 63 68 65 73 20 | 6d 65 6d 6f 72 79 20 62 |witches |memory b|
|00001730| 61 6e 6b 73 2e 20 20 54 | 68 65 20 63 6f 64 65 20 |anks.  T|he code |
|00001740| 65 78 65 63 75 74 65 73 | 20 69 6e 20 74 68 65 20 |executes| in the |
|00001750| 7a 65 72 6f 0d 20 20 20 | 20 20 20 20 20 20 20 20 |zero.   |        |
|00001760| 20 20 20 20 20 20 20 20 | 20 70 61 67 65 20 61 6e |        | page an|
|00001770| 64 20 64 6f 65 73 20 6e | 6f 74 20 67 65 74 20 73 |d does n|ot get s|
|00001780| 77 69 74 63 68 65 64 20 | 6f 75 74 20 77 68 65 6e |witched |out when|
|00001790| 20 77 65 20 61 74 74 65 | 6d 70 74 20 74 6f 0d 20 | we atte|mpt to. |
|000017a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000017b0| 20 20 20 73 77 69 74 63 | 68 20 69 6e 20 74 68 65 |   switc|h in the|
|000017c0| 20 61 75 78 69 6c 69 61 | 72 79 20 52 41 4d 2e 0d | auxilia|ry RAM..|
|000017d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 6f |        |       o|
|000017e0| 20 20 20 20 4a 75 6d 70 | 73 20 74 6f 20 72 65 6c |    Jump|s to rel|
|000017f0| 6f 63 61 74 65 64 20 63 | 6f 64 65 20 6f 6e 20 70 |ocated c|ode on p|
|00001800| 61 67 65 20 7a 65 72 6f | 3a 0d 20 20 20 20 20 20 |age zero|:.      |
|00001810| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 6f 20 |        |      o |
|00001820| 20 20 20 53 77 69 74 63 | 68 65 73 20 69 6e 20 61 |   Switc|hes in a|
|00001830| 75 78 69 6c 69 61 72 79 | 20 6d 65 6d 6f 72 79 20 |uxiliary| memory |
|00001840| 66 6f 72 20 72 65 61 64 | 69 6e 67 20 61 6e 64 20 |for read|ing and |
|00001850| 77 72 69 74 69 6e 67 0d | 20 20 20 20 20 20 20 20 |writing.|        |
|00001860| 20 20 20 20 20 20 20 20 | 20 20 20 20 6f 20 20 20 |        |    o   |
|00001870| 20 53 74 6f 72 65 73 20 | 61 20 76 61 6c 75 65 20 | Stores |a value |
|00001880| 61 74 20 24 38 30 30 20 | 61 6e 64 20 73 65 65 73 |at $800 |and sees|
|00001890| 20 69 66 20 74 68 65 20 | 73 61 6d 65 20 76 61 6c | if the |same val|
|000018a0| 75 65 0d 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |ue.     |        |
|000018b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 61 70 70 65 |        |    appe|
|000018c0| 61 72 73 20 61 74 20 24 | 43 30 30 2e 20 20 49 66 |ars at $|C00.  If|
|000018d0| 20 73 6f 2c 20 6e 6f 20 | 61 75 78 69 6c 69 61 72 | so, no |auxiliar|
|000018e0| 79 20 6d 65 6d 6f 72 79 | 20 69 73 0d 20 20 20 20 |y memory| is.    |
|000018f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001900| 20 20 20 20 20 70 72 65 | 73 65 6e 74 20 28 74 68 |     pre|sent (th|
|00001910| 65 20 6e 6f 6e 2d 65 78 | 74 65 6e 64 65 64 20 38 |e non-ex|tended 8|
|00001920| 30 2d 63 6f 6c 75 6d 6e | 20 63 61 72 64 20 68 61 |0-column| card ha|
|00001930| 73 20 73 70 61 72 73 65 | 0d 20 20 20 20 20 20 20 |s sparse|.       |
|00001940| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001950| 20 20 6d 65 6d 6f 72 79 | 20 6d 61 70 70 69 6e 67 |  memory| mapping|
|00001960| 20 77 68 69 63 68 20 63 | 61 75 73 65 73 20 24 38 | which c|auses $8|
|00001970| 30 30 20 61 6e 64 20 24 | 43 30 30 20 74 6f 20 62 |00 and $|C00 to b|
|00001980| 65 20 74 68 65 0d 20 20 | 20 20 20 20 20 20 20 20 |e the.  |        |
|00001990| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 73 |        |       s|
|000019a0| 61 6d 65 20 6c 6f 63 61 | 74 69 6f 6e 29 2e 0d 20 |ame loca|tion).. |
|000019b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000019c0| 20 20 20 6f 20 20 20 20 | 43 68 61 6e 67 65 73 20 |   o    |Changes |
|000019d0| 76 61 6c 75 65 20 61 74 | 20 24 43 30 30 20 61 6e |value at| $C00 an|
|000019e0| 64 20 73 65 65 73 20 69 | 66 20 74 68 65 20 76 61 |d sees i|f the va|
|000019f0| 6c 75 65 20 61 74 20 24 | 38 30 30 0d 20 20 20 20 |lue at $|800.    |
|00001a00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001a10| 20 20 20 20 20 63 68 61 | 6e 67 65 73 20 61 73 20 |     cha|nges as |
|00001a20| 77 65 6c 6c 2e 20 20 49 | 66 20 73 6f 2c 20 6e 6f |well.  I|f so, no|
|00001a30| 20 61 75 78 69 6c 69 61 | 72 79 20 6d 65 6d 6f 72 | auxilia|ry memor|
|00001a40| 79 2e 20 20 49 66 20 6e | 6f 74 2c 0d 20 20 20 20 |y.  If n|ot,.    |
|00001a50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001a60| 20 20 20 20 20 74 68 65 | 6e 20 74 68 65 72 65 20 |     the|n there |
|00001a70| 69 73 20 31 32 38 4b 20 | 61 76 61 69 6c 61 62 6c |is 128K |availabl|
|00001a80| 65 0d 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |e.      |        |
|00001a90| 20 20 20 20 20 20 6f 20 | 20 20 20 53 77 69 74 63 |      o |   Switc|
|00001aa0| 68 65 73 20 6d 61 69 6e | 20 6d 65 6d 6f 72 79 20 |hes main| memory |
|00001ab0| 62 61 63 6b 20 69 6e 20 | 66 6f 72 20 72 65 61 64 |back in |for read|
|00001ac0| 69 6e 67 20 61 6e 64 20 | 77 72 69 74 69 6e 67 0d |ing and |writing.|
|00001ad0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 6f |        |       o|
|00001ae0| 20 20 20 20 50 75 74 73 | 20 74 68 65 20 7a 65 72 |    Puts| the zer|
|00001af0| 6f 20 70 61 67 65 20 62 | 61 63 6b 20 6c 69 6b 65 |o page b|ack like|
|00001b00| 20 77 65 20 66 6f 75 6e | 64 20 69 74 0d 20 20 20 | we foun|d it.   |
|00001b10| 20 20 20 20 20 20 20 6f | 20 20 20 20 52 65 74 75 |       o|    Retu|
|00001b20| 72 6e 73 20 6d 65 6d 6f | 72 79 20 63 6f 6e 66 69 |rns memo|ry confi|
|00001b30| 67 75 72 61 74 69 6f 6e | 20 66 6f 75 6e 64 20 28 |guration| found (|
|00001b40| 65 69 74 68 65 72 20 36 | 34 4b 20 6f 72 20 31 32 |either 6|4K or 12|
|00001b50| 38 4b 29 0d 6f 20 20 20 | 20 52 65 73 74 6f 72 65 |8K).o   | Restore|
|00001b60| 73 20 6c 61 6e 67 75 61 | 67 65 20 63 61 72 64 20 |s langua|ge card |
|00001b70| 61 6e 64 20 52 4f 4d 20 | 73 74 61 74 65 20 66 72 |and ROM |state fr|
|00001b80| 6f 6d 20 66 6f 75 72 20 | 73 61 76 65 64 20 62 79 |om four |saved by|
|00001b90| 74 65 73 0d 6f 20 20 20 | 20 52 65 73 74 6f 72 65 |tes.o   | Restore|
|00001ba0| 73 20 69 6e 74 65 72 72 | 75 70 74 20 73 74 61 74 |s interr|upt stat|
|00001bb0| 75 73 0d 6f 20 20 20 20 | 52 65 74 75 72 6e 73 20 |us.o    |Returns |
|00001bc0| 74 6f 20 63 61 6c 6c 65 | 72 0d 0d 53 4f 55 52 43 |to calle|r..SOURC|
|00001bd0| 45 20 20 20 46 49 4c 45 | 20 23 30 31 20 3d 3e 49 |E   FILE| #01 =>I|
|00001be0| 44 32 2e 31 0d 20 0d 30 | 30 30 30 3a 20 20 20 20 |D2.1. .0|000:    |
|00001bf0| 20 20 20 20 20 20 20 20 | 20 20 20 20 31 20 20 20 |        |    1   |
|00001c00| 20 20 20 20 20 20 20 20 | 6c 73 74 20 20 20 6f 6e |        |lst   on|
|00001c10| 0d 2d 2d 2d 2d 2d 20 4e | 45 58 54 20 4f 42 4a 45 |.----- N|EXT OBJE|
|00001c20| 43 54 20 46 49 4c 45 20 | 4e 41 4d 45 20 49 53 20 |CT FILE |NAME IS |
|00001c30| 49 44 32 2e 31 2e 4f 42 | 4a 20 20 20 20 20 20 20 |ID2.1.OB|J       |
|00001c40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 0d 32 |        |      .2|
|00001c50| 30 30 30 3a 20 20 20 20 | 20 20 20 20 32 30 30 30 |000:    |    2000|
|00001c60| 20 20 20 20 32 20 20 20 | 20 20 20 20 20 20 20 20 |    2   |        |
|00001c70| 6f 72 67 20 20 20 24 32 | 30 30 30 0d 32 30 30 30 |org   $2|000.2000|
|00001c80| 3a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |:       |        |
|00001c90| 20 33 20 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a | 3 *****|********|
|00001ca0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001cb0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 0d |********|*******.|
|00001cc0| 32 30 30 30 3a 20 20 20 | 20 20 20 20 20 20 20 20 |2000:   |        |
|00001cd0| 20 20 20 20 20 34 20 2a | 20 20 20 20 20 20 20 20 |     4 *|        |
|00001ce0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001cf0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001d00| 20 20 2a 0d 32 30 30 30 | 3a 20 20 20 20 20 20 20 |  *.2000|:       |
|00001d10| 20 20 20 20 20 20 20 20 | 20 35 20 2a 20 20 41 70 |        | 5 *  Ap|
|00001d20| 70 6c 65 20 49 49 20 46 | 61 6d 69 6c 79 20 49 64 |ple II F|amily Id|
|00001d30| 65 6e 74 69 66 69 63 61 | 74 69 6f 6e 20 50 72 6f |entifica|tion Pro|
|00001d40| 67 72 61 6d 20 20 2a 0d | 32 30 30 30 3a 20 20 20 |gram  *.|2000:   |
|00001d50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 36 20 2a |        |     6 *|
|00001d60| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001d70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001d80| 20 20 20 20 20 20 20 20 | 20 20 2a 0d 32 30 30 30 |        |  *.2000|
|00001d90| 3a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |:       |        |
|00001da0| 20 37 20 2a 20 20 20 20 | 20 20 20 20 20 20 20 20 | 7 *    |        |
|00001db0| 20 20 20 56 65 72 73 69 | 6f 6e 20 32 2e 31 20 20 |   Versi|on 2.1  |
|00001dc0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 2a 0d |        |      *.|
|00001dd0| 32 30 30 30 3a 20 20 20 | 20 20 20 20 20 20 20 20 |2000:   |        |
|00001de0| 20 20 20 20 20 38 20 2a | 20 20 20 20 20 20 20 20 |     8 *|        |
|00001df0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001e00| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001e10| 20 20 2a 0d 32 30 30 30 | 3a 20 20 20 20 20 20 20 |  *.2000|:       |
|00001e20| 20 20 20 20 20 20 20 20 | 20 39 20 2a 20 20 20 20 |        | 9 *    |
|00001e30| 20 20 20 20 20 20 20 20 | 20 20 53 65 70 74 65 6d |        |  Septem|
|00001e40| 62 65 72 2c 20 31 39 38 | 38 20 20 20 20 20 20 20 |ber, 198|8       |
|00001e50| 20 20 20 20 20 20 2a 0d | 32 30 30 30 3a 20 20 20 |      *.|2000:   |
|00001e60| 20 20 20 20 20 20 20 20 | 20 20 20 20 31 30 20 2a |        |    10 *|
|00001e70| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001e80| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001e90| 20 20 20 20 20 20 20 20 | 20 20 2a 0d 32 30 30 30 |        |  *.2000|
|00001ea0| 3a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |:       |        |
|00001eb0| 31 31 20 2a 20 20 49 6e | 63 6c 75 64 65 73 20 73 |11 *  In|cludes s|
|00001ec0| 75 70 70 6f 72 74 20 66 | 6f 72 20 72 65 76 69 73 |upport f|or revis|
|00001ed0| 69 6f 6e 73 20 74 6f 20 | 49 49 63 20 20 20 2a 0d |ions to |IIc   *.|
|00001ee0| 32 30 30 30 3a 20 20 20 | 20 20 20 20 20 20 20 20 |2000:   |        |
|00001ef0| 20 20 20 20 31 32 20 2a | 20 20 66 69 72 6d 77 61 |    12 *|  firmwa|
|00001f00| 72 65 2c 20 61 6e 64 20 | 49 49 67 73 20 69 64 65 |re, and |IIgs ide|
|00001f10| 6e 74 69 66 69 63 61 74 | 69 6f 6e 20 74 6f 6f 20 |ntificat|ion too |
|00001f20| 20 20 2a 0d 32 30 30 30 | 3a 20 20 20 20 20 20 20 |  *.2000|:       |
|00001f30| 20 20 20 20 20 20 20 20 | 31 33 20 2a 20 20 20 20 |        |13 *    |
|00001f40| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001f50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00001f60| 20 20 20 20 20 20 2a 0d | 32 30 30 30 3a 20 20 20 |      *.|2000:   |
|00001f70| 20 20 20 20 20 20 20 20 | 20 20 20 20 31 34 20 2a |        |    14 *|
|00001f80| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001f90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001fa0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 0d 32 30 30 30 |********|***.2000|
|00001fb0| 3a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |:       |        |
|00001fc0| 31 35 20 2a 0d 32 30 30 | 30 3a 20 20 20 20 20 20 |15 *.200|0:      |
|00001fd0| 20 20 20 20 20 20 20 20 | 20 31 36 20 2a 0d 32 30 |        | 16 *.20|
|00001fe0| 30 30 3a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |00:     |        |
|00001ff0| 20 20 31 37 20 2a 20 20 | 46 69 72 73 74 2c 20 73 |  17 *  |First, s|
|00002000| 6f 6d 65 20 67 6c 6f 62 | 61 6c 20 65 71 75 61 74 |ome glob|al equat|
|00002010| 65 73 20 66 6f 72 20 74 | 68 65 20 72 6f 75 74 69 |es for t|he routi|
|00002020| 6e 65 3a 0d 32 30 30 30 | 3a 20 20 20 20 20 20 20 |ne:.2000|:       |
|00002030| 20 20 20 20 20 20 20 20 | 31 38 20 2a 0d 32 30 30 |        |18 *.200|
|00002040| 30 3a 20 20 20 20 20 20 | 20 20 30 30 30 31 20 20 |0:      |  0001  |
|00002050| 20 31 39 20 49 49 70 6c | 61 69 6e 20 20 20 65 71 | 19 IIpl|ain   eq|
|00002060| 75 20 20 20 24 30 31 20 | 20 20 20 20 20 20 20 20 |u   $01 |        |
|00002070| 20 20 3b 41 70 70 6c 65 | 20 49 49 0d 32 30 30 30 |  ;Apple| II.2000|
|00002080| 3a 20 20 20 20 20 20 20 | 20 30 30 30 32 20 20 20 |:       | 0002   |
|00002090| 32 30 20 49 49 70 6c 75 | 73 20 20 20 20 65 71 75 |20 IIplu|s    equ|
|000020a0| 20 20 20 24 30 32 20 20 | 20 20 20 20 20 20 20 20 |   $02  |        |
|000020b0| 20 3b 41 70 70 6c 65 20 | 49 49 2b 0d 32 30 30 30 | ;Apple |II+.2000|
|000020c0| 3a 20 20 20 20 20 20 20 | 20 30 30 30 33 20 20 20 |:       | 0003   |
|000020d0| 32 31 20 49 49 49 65 6d | 20 20 20 20 20 65 71 75 |21 IIIem|     equ|
|000020e0| 20 20 20 24 30 33 20 20 | 20 20 20 20 20 20 20 20 |   $03  |        |
|000020f0| 20 3b 41 70 70 6c 65 20 | 2f 2f 2f 20 69 6e 20 65 | ;Apple |/// in e|
|00002100| 6d 75 6c 61 74 69 6f 6e | 20 6d 6f 64 65 0d 32 30 |mulation| mode.20|
|00002110| 30 30 3a 20 20 20 20 20 | 20 20 20 30 30 30 34 20 |00:     |   0004 |
|00002120| 20 20 32 32 20 49 49 65 | 20 20 20 20 20 20 20 65 |  22 IIe|       e|
|00002130| 71 75 20 20 20 24 30 34 | 20 20 20 20 20 20 20 20 |qu   $04|        |
|00002140| 20 20 20 3b 41 70 70 6c | 65 20 49 49 65 0d 32 30 |   ;Appl|e IIe.20|
|00002150| 30 30 3a 20 20 20 20 20 | 20 20 20 30 30 30 35 20 |00:     |   0005 |
|00002160| 20 20 32 33 20 49 49 63 | 20 20 20 20 20 20 20 65 |  23 IIc|       e|
|00002170| 71 75 20 20 20 24 30 35 | 20 20 20 20 20 20 20 20 |qu   $05|        |
|00002180| 20 20 20 3b 41 70 70 6c | 65 20 49 49 63 0d 32 30 |   ;Appl|e IIc.20|
|00002190| 30 30 3a 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |00:     |        |
|000021a0| 20 20 32 34 20 2a 0d 32 | 30 30 30 3a 20 20 20 20 |  24 *.2|000:    |
|000021b0| 20 20 20 20 30 30 30 31 | 20 20 20 32 35 20 73 61 |    0001|   25 sa|
|000021c0| 66 65 20 20 20 20 20 20 | 65 71 75 20 20 20 24 30 |fe      |equ   $0|
|000021d0| 30 30 31 20 20 20 20 20 | 20 20 20 20 3b 73 74 61 |001     |    ;sta|
|000021e0| 72 74 20 6f 66 20 63 6f | 64 65 20 72 65 6c 6f 63 |rt of co|de reloc|
|000021f0| 61 74 65 64 20 74 6f 20 | 7a 70 0d 32 30 30 30 3a |ated to |zp.2000:|
|00002200| 20 20 20 20 20 20 20 20 | 30 30 30 36 20 20 20 32 |        |0006   2|
|00002210| 36 20 6c 6f 63 61 74 69 | 6f 6e 20 20 65 71 75 20 |6 locati|on  equ |
|00002220| 20 20 24 30 36 20 20 20 | 20 20 20 20 20 20 20 20 |  $06   |        |
|00002230| 3b 7a 65 72 6f 20 70 61 | 67 65 20 6c 6f 63 61 74 |;zero pa|ge locat|
|00002240| 69 6f 6e 20 74 6f 20 75 | 73 65 0d 32 30 30 30 3a |ion to u|se.2000:|
|00002250| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 32 |        |       2|
|00002260| 37 20 2a 0d 32 30 30 30 | 3a 20 20 20 20 20 20 20 |7 *.2000|:       |
|00002270| 20 30 30 46 42 20 20 20 | 32 38 20 78 63 65 20 20 | 00FB   |28 xce  |
|00002280| 20 20 20 20 20 65 71 75 | 20 20 20 24 46 42 20 20 |     equ|   $FB  |
|00002290| 20 20 20 20 20 20 20 20 | 20 3b 36 35 38 31 36 20 |        | ;65816 |
|000022a0| 58 43 45 20 69 6e 73 74 | 72 75 63 74 69 6f 6e 0d |XCE inst|ruction.|
|000022b0| 32 30 30 30 3a 20 20 20 | 20 20 20 20 20 20 20 20 |2000:   |        |
|000022c0| 20 20 20 20 32 39 20 2a | 0d 32 30 30 30 3a 20 20 |    29 *|.2000:  |
|000022d0| 20 20 20 20 20 20 30 30 | 41 41 20 20 20 33 30 20 |      00|AA   30 |
|000022e0| 74 65 73 74 31 20 20 20 | 20 20 65 71 75 20 20 20 |test1   |  equ   |
|000022f0| 24 41 41 20 20 20 20 20 | 20 20 20 20 20 20 3b 74 |$AA     |      ;t|
|00002300| 65 73 74 20 62 79 74 65 | 20 23 31 0d 32 30 30 30 |est byte| #1.2000|
|00002310| 3a 20 20 20 20 20 20 20 | 20 30 30 35 35 20 20 20 |:       | 0055   |
|00002320| 33 31 20 74 65 73 74 32 | 20 20 20 20 20 65 71 75 |31 test2|     equ|
|00002330| 20 20 20 24 35 35 20 20 | 20 20 20 20 20 20 20 20 |   $55  |        |
|00002340| 20 3b 6c 73 72 20 6f 66 | 20 74 65 73 74 31 0d 32 | ;lsr of| test1.2|
|00002350| 30 30 30 3a 20 20 20 20 | 20 20 20 20 30 30 38 38 |000:    |    0088|
|00002360| 20 20 20 33 32 20 74 65 | 73 74 33 20 20 20 20 20 |   32 te|st3     |
|00002370| 65 71 75 20 20 20 24 38 | 38 20 20 20 20 20 20 20 |equ   $8|8       |
|00002380| 20 20 20 20 3b 74 65 73 | 74 20 62 79 74 65 20 23 |    ;tes|t byte #|
|00002390| 33 0d 32 30 30 30 3a 20 | 20 20 20 20 20 20 20 30 |3.2000: |       0|
|000023a0| 30 45 45 20 20 20 33 33 | 20 74 65 73 74 34 20 20 |0EE   33| test4  |
|000023b0| 20 20 20 65 71 75 20 20 | 20 24 45 45 20 20 20 20 |   equ  | $EE    |
|000023c0| 20 20 20 20 20 20 20 3b | 74 65 73 74 20 62 79 74 |       ;|test byt|
|000023d0| 65 20 23 34 0d 32 30 30 | 30 3a 20 20 20 20 20 20 |e #4.200|0:      |
|000023e0| 20 20 20 20 20 20 20 20 | 20 33 34 20 2a 0d 32 30 |        | 34 *.20|
|000023f0| 30 30 3a 20 20 20 20 20 | 20 20 20 30 34 30 30 20 |00:     |   0400 |
|00002400| 20 20 33 35 20 62 65 67 | 70 61 67 65 31 20 20 65 |  35 beg|page1  e|
|00002410| 71 75 20 20 20 24 34 30 | 30 20 20 20 20 20 20 20 |qu   $40|0       |
|00002420| 20 20 20 3b 62 65 67 69 | 6e 6e 69 6e 67 20 6f 66 |   ;begi|nning of|
|00002430| 20 74 65 78 74 20 70 61 | 67 65 20 31 0d 32 30 30 | text pa|ge 1.200|
|00002440| 30 3a 20 20 20 20 20 20 | 20 20 30 38 30 30 20 20 |0:      |  0800  |
|00002450| 20 33 36 20 62 65 67 70 | 61 67 65 32 20 20 65 71 | 36 begp|age2  eq|
|00002460| 75 20 20 20 24 38 30 30 | 20 20 20 20 20 20 20 20 |u   $800|        |
|00002470| 20 20 3b 62 65 67 69 6e | 6e 69 6e 67 20 6f 66 20 |  ;begin|ning of |
|00002480| 74 65 78 74 20 70 61 67 | 65 20 32 0d 32 30 30 30 |text pag|e 2.2000|
|00002490| 3a 20 20 20 20 20 20 20 | 20 30 43 30 30 20 20 20 |:       | 0C00   |
|000024a0| 33 37 20 62 65 67 73 70 | 72 73 65 20 20 65 71 75 |37 begsp|rse  equ|
|000024b0| 20 20 20 24 43 30 30 20 | 20 20 20 20 20 20 20 20 |   $C00 |        |
|000024c0| 20 3b 62 79 74 65 20 61 | 66 74 65 72 20 74 65 78 | ;byte a|fter tex|
|000024d0| 74 20 70 61 67 65 20 32 | 0d 32 30 30 30 3a 20 20 |t page 2|.2000:  |
|000024e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 33 38 20 |        |     38 |
|000024f0| 2a 0d 32 30 30 30 3a 20 | 20 20 20 20 20 20 20 43 |*.2000: |       C|
|00002500| 30 30 30 20 20 20 33 39 | 20 63 6c 72 38 30 63 6f |000   39| clr80co|
|00002510| 6c 20 20 65 71 75 20 20 | 20 24 43 30 30 30 20 20 |l  equ  | $C000  |
|00002520| 20 20 20 20 20 20 20 3b | 64 69 73 61 62 6c 65 20 |       ;|disable |
|00002530| 38 30 2d 63 6f 6c 75 6d | 6e 20 73 74 6f 72 65 0d |80-colum|n store.|
|00002540| 32 30 30 30 3a 20 20 20 | 20 20 20 20 20 43 30 30 |2000:   |     C00|
|00002550| 31 20 20 20 34 30 20 73 | 65 74 38 30 63 6f 6c 20 |1   40 s|et80col |
|00002560| 20 65 71 75 20 20 20 24 | 43 30 30 31 20 20 20 20 | equ   $|C001    |
|00002570| 20 20 20 20 20 3b 65 6e | 61 62 6c 65 20 38 30 2d |     ;en|able 80-|
|00002580| 63 6f 6c 75 6d 6e 20 73 | 74 6f 72 65 0d 32 30 30 |column s|tore.200|
|00002590| 30 3a 20 20 20 20 20 20 | 20 20 43 30 30 32 20 20 |0:      |  C002  |
|000025a0| 20 34 31 20 72 64 6d 61 | 69 6e 72 61 6d 20 65 71 | 41 rdma|inram eq|
|000025b0| 75 20 20 20 24 43 30 30 | 32 20 20 20 20 20 20 20 |u   $C00|2       |
|000025c0| 20 20 3b 72 65 61 64 20 | 6d 61 69 6e 20 72 61 6d |  ;read |main ram|
|000025d0| 0d 32 30 30 30 3a 20 20 | 20 20 20 20 20 20 43 30 |.2000:  |      C0|
|000025e0| 30 33 20 20 20 34 32 20 | 72 64 63 61 72 64 72 61 |03   42 |rdcardra|
|000025f0| 6d 20 65 71 75 20 20 20 | 24 43 30 30 33 20 20 20 |m equ   |$C003   |
|00002600| 20 20 20 20 20 20 3b 72 | 65 61 64 20 61 75 78 20 |      ;r|ead aux |
|00002610| 72 61 6d 0d 32 30 30 30 | 3a 20 20 20 20 20 20 20 |ram.2000|:       |
|00002620| 20 43 30 30 34 20 20 20 | 34 33 20 77 72 6d 61 69 | C004   |43 wrmai|
|00002630| 6e 72 61 6d 20 65 71 75 | 20 20 20 24 43 30 30 34 |nram equ|   $C004|
|00002640| 20 20 20 20 20 20 20 20 | 20 3b 77 72 69 74 65 20 |        | ;write |
|00002650| 6d 61 69 6e 20 72 61 6d | 0d 32 30 30 30 3a 20 20 |main ram|.2000:  |
|00002660| 20 20 20 20 20 20 43 30 | 30 35 20 20 20 34 34 20 |      C0|05   44 |
|00002670| 77 72 63 61 72 64 72 61 | 6d 20 65 71 75 20 20 20 |wrcardra|m equ   |
|00002680| 24 43 30 30 35 20 20 20 | 20 20 20 20 20 20 3b 77 |$C005   |      ;w|
|00002690| 72 69 74 65 20 61 75 78 | 20 72 61 6d 0d 32 30 30 |rite aux| ram.200|
|000026a0| 30 3a 20 20 20 20 20 20 | 20 20 43 30 31 33 20 20 |0:      |  C013  |
|000026b0| 20 34 35 20 72 64 72 61 | 6d 72 64 20 20 20 65 71 | 45 rdra|mrd   eq|
|000026c0| 75 20 20 20 24 43 30 31 | 33 20 20 20 20 20 20 20 |u   $C01|3       |
|000026d0| 20 20 3b 61 72 65 20 77 | 65 20 72 65 61 64 69 6e |  ;are w|e readin|
|000026e0| 67 20 61 75 78 20 72 61 | 6d 3f 0d 32 30 30 30 3a |g aux ra|m?.2000:|
|000026f0| 20 20 20 20 20 20 20 20 | 43 30 31 36 20 20 20 34 |        |C016   4|
|00002700| 36 20 72 64 61 6c 74 7a | 70 20 20 20 65 71 75 20 |6 rdaltz|p   equ |
|00002710| 20 20 24 43 30 31 36 20 | 20 20 20 20 20 20 20 20 |  $C016 |        |
|00002720| 3b 61 72 65 20 77 65 20 | 72 65 61 64 69 6e 67 20 |;are we |reading |
|00002730| 61 75 78 20 7a 65 72 6f | 20 70 61 67 65 3f 0d 32 |aux zero| page?.2|
|00002740| 30 30 30 3a 20 20 20 20 | 20 20 20 20 43 30 31 38 |000:    |    C018|
|00002750| 20 20 20 34 37 20 72 64 | 38 30 63 6f 6c 20 20 20 |   47 rd|80col   |
|00002760| 65 71 75 20 20 20 24 43 | 30 31 38 20 20 20 20 20 |equ   $C|018     |
|00002770| 20 20 20 20 3b 61 72 65 | 20 77 65 20 75 73 69 6e |    ;are| we usin|
|00002780| 67 20 38 30 2d 63 6f 6c | 75 6d 6e 73 3f 0d 32 30 |g 80-col|umns?.20|
|00002790| 30 30 3a 20 20 20 20 20 | 20 20 20 43 30 31 41 20 |00:     |   C01A |
|000027a0| 20 20 34 38 20 72 64 74 | 65 78 74 20 20 20 20 65 |  48 rdt|ext    e|
|000027b0| 71 75 20 20 20 24 43 30 | 31 41 20 20 20 20 20 20 |qu   $C0|1A      |
|000027c0| 20 20 20 3b 72 65 61 64 | 20 69 66 20 74 65 78 74 |   ;read| if text|
|000027d0| 20 69 73 20 64 69 73 70 | 6c 61 79 65 64 0d 32 30 | is disp|layed.20|
|000027e0| 30 30 3a 20 20 20 20 20 | 20 20 20 43 30 31 43 20 |00:     |   C01C |
|000027f0| 20 20 34 39 20 72 64 70 | 61 67 65 32 20 20 20 65 |  49 rdp|age2   e|
|00002800| 71 75 20 20 20 24 43 30 | 31 43 20 20 20 20 20 20 |qu   $C0|1C      |
|00002810| 20 20 20 3b 72 65 61 64 | 20 69 66 20 70 61 67 65 |   ;read| if page|
|00002820| 20 32 20 69 73 20 64 69 | 73 70 6c 61 79 65 64 0d | 2 is di|splayed.|
|00002830| 32 30 30 30 3a 20 20 20 | 20 20 20 20 20 43 30 35 |2000:   |     C05|
|00002840| 30 20 20 20 35 30 20 74 | 78 74 63 6c 72 20 20 20 |0   50 t|xtclr   |
|00002850| 20 65 71 75 20 20 20 24 | 43 30 35 30 20 20 20 20 | equ   $|C050    |
|00002860| 20 20 20 20 20 3b 73 77 | 69 74 63 68 20 69 6e 20 |     ;sw|itch in |
|00002870| 67 72 61 70 68 69 63 73 | 0d 32 30 30 30 3a 20 20 |graphics|.2000:  |
|00002880| 20 20 20 20 20 20 43 30 | 35 31 20 20 20 35 31 20 |      C0|51   51 |
|00002890| 74 78 74 73 65 74 20 20 | 20 20 65 71 75 20 20 20 |txtset  |  equ   |
|000028a0| 24 43 30 35 31 20 20 20 | 20 20 20 20 20 20 3b 73 |$C051   |      ;s|
|000028b0| 77 69 74 63 68 20 69 6e | 20 74 65 78 74 0d 32 30 |witch in| text.20|
|000028c0| 30 30 3a 20 20 20 20 20 | 20 20 20 43 30 35 34 20 |00:     |   C054 |
|000028d0| 20 20 35 32 20 74 78 74 | 70 61 67 65 31 20 20 65 |  52 txt|page1  e|
|000028e0| 71 75 20 20 20 24 43 30 | 35 34 20 20 20 20 20 20 |qu   $C0|54      |
|000028f0| 20 20 20 3b 73 77 69 74 | 63 68 20 69 6e 20 70 61 |   ;swit|ch in pa|
|00002900| 67 65 20 31 0d 32 30 30 | 30 3a 20 20 20 20 20 20 |ge 1.200|0:      |
|00002910| 20 20 43 30 35 35 20 20 | 20 35 33 20 74 78 74 70 |  C055  | 53 txtp|
|00002920| 61 67 65 32 20 20 65 71 | 75 20 20 20 24 43 30 35 |age2  eq|u   $C05|
|00002930| 35 20 20 20 20 20 20 20 | 20 20 3b 73 77 69 74 63 |5       |  ;switc|
|00002940| 68 20 69 6e 20 70 61 67 | 65 20 32 0d 32 30 30 30 |h in pag|e 2.2000|
|00002950| 3a 20 20 20 20 20 20 20 | 20 43 30 38 30 20 20 20 |:       | C080   |
|00002960| 35 34 20 72 61 6d 69 6e | 20 20 20 20 20 65 71 75 |54 ramin|     equ|
|00002970| 20 20 20 24 43 30 38 30 | 20 20 20 20 20 20 20 20 |   $C080|        |
|00002980| 20 3b 72 65 61 64 20 4c | 43 20 62 61 6e 6b 20 32 | ;read L|C bank 2|
|00002990| 2c 20 77 72 69 74 65 20 | 70 72 6f 74 65 63 74 65 |, write |protecte|
|000029a0| 64 0d 32 30 30 30 3a 20 | 20 20 20 20 20 20 20 43 |d.2000: |       C|
|000029b0| 30 38 31 20 20 20 35 35 | 20 72 6f 6d 69 6e 20 20 |081   55| romin  |
|000029c0| 20 20 20 65 71 75 20 20 | 20 24 43 30 38 31 20 20 |   equ  | $C081  |
|000029d0| 20 20 20 20 20 20 20 3b | 72 65 61 64 20 52 4f 4d |       ;|read ROM|
|000029e0| 2c 20 32 20 72 65 61 64 | 73 20 77 72 69 74 65 20 |, 2 read|s write |
|000029f0| 65 6e 61 62 6c 65 20 4c | 43 0d 32 30 30 30 3a 20 |enable L|C.2000: |
|00002a00| 20 20 20 20 20 20 20 43 | 30 38 42 20 20 20 35 36 |       C|08B   56|
|00002a10| 20 6c 63 62 61 6e 6b 31 | 20 20 20 65 71 75 20 20 | lcbank1|   equ  |
|00002a20| 20 24 43 30 38 42 20 20 | 20 20 20 20 20 20 20 3b | $C08B  |       ;|
|00002a30| 4c 43 20 62 61 6e 6b 20 | 31 20 65 6e 61 62 6c 65 |LC bank |1 enable|
|00002a40| 20 0d 32 30 30 30 3a 20 | 20 20 20 20 20 20 20 20 | .2000: |        |
|00002a50| 20 20 20 20 20 20 35 37 | 20 2a 0d 32 30 30 30 3a |      57| *.2000:|
|00002a60| 20 20 20 20 20 20 20 20 | 45 30 30 30 20 20 20 35 |        |E000   5|
|00002a70| 38 20 6c 63 31 20 20 20 | 20 20 20 20 65 71 75 20 |8 lc1   |    equ |
|00002a80| 20 20 24 45 30 30 30 20 | 20 20 20 20 20 20 20 20 |  $E000 |        |
|00002a90| 3b 62 79 74 65 73 20 74 | 6f 20 73 61 76 65 20 66 |;bytes t|o save f|
|00002aa0| 6f 72 20 4c 43 0d 32 30 | 30 30 3a 20 20 20 20 20 |or LC.20|00:     |
|00002ab0| 20 20 20 44 30 30 30 20 | 20 20 35 39 20 6c 63 32 |   D000 |  59 lc2|
|00002ac0| 20 20 20 20 20 20 20 65 | 71 75 20 20 20 24 44 30 |       e|qu   $D0|
|00002ad0| 30 30 20 20 20 20 20 20 | 20 20 20 3b 73 61 76 65 |00      |   ;save|
|00002ae0| 2f 72 65 73 74 6f 72 65 | 20 72 6f 75 74 69 6e 65 |/restore| routine|
|00002af0| 0d 32 30 30 30 3a 20 20 | 20 20 20 20 20 20 44 34 |.2000:  |      D4|
|00002b00| 30 30 20 20 20 36 30 20 | 6c 63 33 20 20 20 20 20 |00   60 |lc3     |
|00002b10| 20 20 65 71 75 20 20 20 | 24 44 34 30 30 0d 32 30 |  equ   |$D400.20|
|00002b20| 30 30 3a 20 20 20 20 20 | 20 20 20 44 38 30 30 20 |00:     |   D800 |
|00002b30| 20 20 36 31 20 6c 63 34 | 20 20 20 20 20 20 20 65 |  61 lc4|       e|
|00002b40| 71 75 20 20 20 24 44 38 | 30 30 0d 32 30 30 30 3a |qu   $D8|00.2000:|
|00002b50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 36 |        |       6|
|00002b60| 32 20 2a 0d 32 30 30 30 | 3a 20 20 20 20 20 20 20 |2 *.2000|:       |
|00002b70| 20 46 45 31 46 20 20 20 | 36 33 20 69 64 72 6f 75 | FE1F   |63 idrou|
|00002b80| 74 69 6e 65 20 65 71 75 | 20 20 20 24 46 45 31 46 |tine equ|   $FE1F|
|00002b90| 20 20 20 20 20 20 20 20 | 20 3b 49 49 67 73 20 69 |        | ;IIgs i|
|00002ba0| 64 20 72 6f 75 74 69 6e | 65 0d 32 30 30 30 3a 20 |d routin|e.2000: |
|00002bb0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 36 34 |        |      64|
|00002bc0| 20 2a 0d 32 30 30 30 3a | 20 20 20 20 20 20 20 20 | *.2000:|        |
|00002bd0| 20 20 20 20 20 20 20 36 | 35 20 2a 20 20 53 74 61 |       6|5 *  Sta|
|00002be0| 72 74 20 62 79 20 73 61 | 76 69 6e 67 20 74 68 65 |rt by sa|ving the|
|00002bf0| 20 73 74 61 74 65 20 6f | 66 20 74 68 65 20 6c 61 | state o|f the la|
|00002c00| 6e 67 75 61 67 65 20 63 | 61 72 64 20 62 61 6e 6b |nguage c|ard bank|
|00002c10| 73 20 61 6e 64 0d 32 30 | 30 30 3a 20 20 20 20 20 |s and.20|00:     |
|00002c20| 20 20 20 20 20 20 20 20 | 20 20 36 36 20 2a 20 20 |        |  66 *  |
|00002c30| 62 79 20 73 77 69 74 63 | 68 69 6e 67 20 69 6e 20 |by switc|hing in |
|00002c40| 6d 61 69 6e 20 52 4f 4d | 2e 0d 32 30 30 30 3a 20 |main ROM|..2000: |
|00002c50| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 36 37 |        |      67|
|00002c60| 20 2a 0d 32 30 30 30 3a | 30 38 20 20 20 20 20 20 | *.2000:|08      |
|00002c70| 20 20 20 20 20 20 20 36 | 38 20 73 74 72 74 20 20 |       6|8 strt  |
|00002c80| 20 20 20 20 70 68 70 20 | 20 20 20 20 20 20 20 20 |    php |        |
|00002c90| 20 20 20 20 20 20 20 20 | 3b 73 61 76 65 20 74 68 |        |;save th|
|00002ca0| 65 20 70 72 6f 63 65 73 | 73 6f 72 20 73 74 61 74 |e proces|sor stat|
|00002cb0| 65 0d 32 30 30 31 3a 37 | 38 20 20 20 20 20 20 20 |e.2001:7|8       |
|00002cc0| 20 20 20 20 20 20 36 39 | 20 20 20 20 20 20 20 20 |      69|        |
|00002cd0| 20 20 20 73 65 69 20 20 | 20 20 20 20 20 20 20 20 |   sei  |        |
|00002ce0| 20 20 20 20 20 20 20 3b | 62 65 66 6f 72 65 20 64 |       ;|before d|
|00002cf0| 69 73 61 62 6c 69 6e 67 | 20 69 6e 74 65 72 72 75 |isabling| interru|
|00002d00| 70 74 73 0d 32 30 30 32 | 3a 41 44 20 30 30 20 45 |pts.2002|:AD 00 E|
|00002d10| 30 20 20 20 20 20 20 20 | 37 30 20 20 20 20 20 20 |0       |70      |
|00002d20| 20 20 20 20 20 6c 64 61 | 20 20 20 6c 63 31 20 20 |     lda|   lc1  |
|00002d30| 20 20 20 20 20 20 20 20 | 20 3b 73 61 76 65 20 66 |        | ;save f|
|00002d40| 6f 75 72 20 62 79 74 65 | 73 20 66 72 6f 6d 0d 32 |our byte|s from.2|
|00002d50| 30 30 35 3a 38 44 20 46 | 31 20 32 31 20 20 20 20 |005:8D F|1 21    |
|00002d60| 20 20 20 37 31 20 20 20 | 20 20 20 20 20 20 20 20 |   71   |        |
|00002d70| 73 74 61 20 20 20 73 61 | 76 65 20 20 20 20 20 20 |sta   sa|ve      |
|00002d80| 20 20 20 20 3b 52 4f 4d | 2f 52 41 4d 20 61 72 65 |    ;ROM|/RAM are|
|00002d90| 61 20 66 6f 72 20 6c 61 | 74 65 72 0d 32 30 30 38 |a for la|ter.2008|
|00002da0| 3a 41 44 20 30 30 20 44 | 30 20 20 20 20 20 20 20 |:AD 00 D|0       |
|00002db0| 37 32 20 20 20 20 20 20 | 20 20 20 20 20 6c 64 61 |72      |     lda|
|00002dc0| 20 20 20 6c 63 32 20 20 | 20 20 20 20 20 20 20 20 |   lc2  |        |
|00002dd0| 20 3b 72 65 73 74 6f 72 | 69 6e 67 20 6f 66 20 52 | ;restor|ing of R|
|00002de0| 41 4d 2f 52 4f 4d 0d 32 | 30 30 42 3a 38 44 20 46 |AM/ROM.2|00B:8D F|
|00002df0| 32 20 32 31 20 20 20 20 | 20 20 20 37 33 20 20 20 |2 21    |   73   |
|00002e00| 20 20 20 20 20 20 20 20 | 73 74 61 20 20 20 73 61 |        |sta   sa|
|00002e10| 76 65 2b 31 20 20 20 20 | 20 20 20 20 3b 74 6f 20 |ve+1    |    ;to |
|00002e20| 6f 72 69 67 69 6e 61 6c | 20 63 6f 6e 64 69 74 69 |original| conditi|
|00002e30| 6f 6e 0d 32 30 30 45 3a | 41 44 20 30 30 20 44 34 |on.200E:|AD 00 D4|
|00002e40| 20 20 20 20 20 20 20 37 | 34 20 20 20 20 20 20 20 |       7|4       |
|00002e50| 20 20 20 20 6c 64 61 20 | 20 20 6c 63 33 0d 32 30 |    lda |  lc3.20|
|00002e60| 31 31 3a 38 44 20 46 33 | 20 32 31 20 20 20 20 20 |11:8D F3| 21     |
|00002e70| 20 20 37 35 20 20 20 20 | 20 20 20 20 20 20 20 73 |  75    |       s|
|00002e80| 74 61 20 20 20 73 61 76 | 65 2b 32 0d 32 30 31 34 |ta   sav|e+2.2014|
|00002e90| 3a 41 44 20 30 30 20 44 | 38 20 20 20 20 20 20 20 |:AD 00 D|8       |
|00002ea0| 37 36 20 20 20 20 20 20 | 20 20 20 20 20 6c 64 61 |76      |     lda|
|00002eb0| 20 20 20 6c 63 34 0d 32 | 30 31 37 3a 38 44 20 46 |   lc4.2|017:8D F|
|00002ec0| 34 20 32 31 20 20 20 20 | 20 20 20 37 37 20 20 20 |4 21    |   77   |
|00002ed0| 20 20 20 20 20 20 20 20 | 73 74 61 20 20 20 73 61 |        |sta   sa|
|00002ee0| 76 65 2b 33 0d 32 30 31 | 41 3a 41 44 20 38 31 20 |ve+3.201|A:AD 81 |
|00002ef0| 43 30 20 20 20 20 20 20 | 20 37 38 20 20 20 20 20 |C0      | 78     |
|00002f00| 20 20 20 20 20 20 6c 64 | 61 20 20 20 24 43 30 38 |      ld|a   $C08|
|00002f10| 31 20 20 20 20 20 20 20 | 20 20 3b 72 65 61 64 20 |1       |  ;read |
|00002f20| 52 4f 4d 0d 32 30 31 44 | 3a 41 44 20 38 31 20 43 |ROM.201D|:AD 81 C|
|00002f30| 30 20 20 20 20 20 20 20 | 37 39 20 20 20 20 20 20 |0       |79      |
|00002f40| 20 20 20 20 20 6c 64 61 | 20 20 20 24 43 30 38 31 |     lda|   $C081|
|00002f50| 0d 32 30 32 30 3a 41 39 | 20 30 30 20 20 20 20 20 |.2020:A9| 00     |
|00002f60| 20 20 20 20 20 38 30 20 | 20 20 20 20 20 20 20 20 |     80 |        |
|00002f70| 20 20 6c 64 61 20 20 20 | 23 30 20 20 20 20 20 20 |  lda   |#0      |
|00002f80| 20 20 20 20 20 20 3b 73 | 74 61 72 74 20 62 79 20 |      ;s|tart by |
|00002f90| 61 73 73 75 6d 69 6e 67 | 20 75 6e 6b 6e 6f 77 6e |assuming| unknown|
|00002fa0| 20 6d 61 63 68 69 6e 65 | 0d 32 30 32 32 3a 38 44 | machine|.2022:8D|
|00002fb0| 20 45 38 20 32 31 20 20 | 20 20 20 20 20 38 31 20 | E8 21  |     81 |
|00002fc0| 20 20 20 20 20 20 20 20 | 20 20 73 74 61 20 20 20 |        |  sta   |
|00002fd0| 6d 61 63 68 69 6e 65 0d | 32 30 32 35 3a 38 44 20 |machine.|2025:8D |
|00002fe0| 45 39 20 32 31 20 20 20 | 20 20 20 20 38 32 20 20 |E9 21   |    82  |
|00002ff0| 20 20 20 20 20 20 20 20 | 20 73 74 61 20 20 20 72 |        | sta   r|
|00003000| 6f 6d 6c 65 76 65 6c 0d | 32 30 32 38 3a 20 20 20 |omlevel.|2028:   |
|00003010| 20 20 20 20 20 20 20 20 | 20 20 20 20 38 33 20 2a |        |    83 *|
|00003020| 0d 32 30 32 38 3a 41 35 | 20 30 36 20 20 20 20 20 |.2028:A5| 06     |
|00003030| 20 20 20 20 20 38 34 20 | 49 64 53 74 61 72 74 20 |     84 |IdStart |
|00003040| 20 20 6c 64 61 20 20 20 | 6c 6f 63 61 74 69 6f 6e |  lda   |location|
|00003050| 20 20 20 20 20 20 3b 73 | 61 76 65 20 7a 65 72 6f |      ;s|ave zero|
|00003060| 20 70 61 67 65 20 6c 6f | 63 61 74 69 6f 6e 73 0d | page lo|cations.|
|00003070| 32 30 32 41 3a 38 44 20 | 46 35 20 32 31 20 20 20 |202A:8D |F5 21   |
|00003080| 20 20 20 20 38 35 20 20 | 20 20 20 20 20 20 20 20 |    85  |        |
|00003090| 20 73 74 61 20 20 20 73 | 61 76 65 2b 34 20 20 20 | sta   s|ave+4   |
|000030a0| 20 20 20 20 20 3b 66 6f | 72 20 6c 61 74 65 72 20 |     ;fo|r later |
|000030b0| 72 65 73 74 6f 72 61 74 | 69 6f 6e 0d 32 30 32 44 |restorat|ion.202D|
|000030c0| 3a 41 35 20 30 37 20 20 | 20 20 20 20 20 20 20 20 |:A5 07  |        |
|000030d0| 38 36 20 20 20 20 20 20 | 20 20 20 20 20 6c 64 61 |86      |     lda|
|000030e0| 20 20 20 6c 6f 63 61 74 | 69 6f 6e 2b 31 0d 32 30 |   locat|ion+1.20|
|000030f0| 32 46 3a 38 44 20 46 36 | 20 32 31 20 20 20 20 20 |2F:8D F6| 21     |
|00003100| 20 20 38 37 20 20 20 20 | 20 20 20 20 20 20 20 73 |  87    |       s|
|00003110| 74 61 20 20 20 73 61 76 | 65 2b 35 0d 32 30 33 32 |ta   sav|e+5.2032|
|00003120| 3a 41 39 20 46 42 20 20 | 20 20 20 20 20 20 20 20 |:A9 FB  |        |
|00003130| 38 38 20 20 20 20 20 20 | 20 20 20 20 20 6c 64 61 |88      |     lda|
|00003140| 20 20 20 23 24 46 42 20 | 20 20 20 20 20 20 20 20 |   #$FB |        |
|00003150| 20 3b 61 6c 6c 20 49 44 | 20 62 79 74 65 73 20 61 | ;all ID| bytes a|
|00003160| 72 65 20 69 6e 20 70 61 | 67 65 20 24 46 42 0d 32 |re in pa|ge $FB.2|
|00003170| 30 33 34 3a 38 35 20 30 | 37 20 20 20 20 20 20 20 |034:85 0|7       |
|00003180| 20 20 20 38 39 20 20 20 | 20 20 20 20 20 20 20 20 |   89   |        |
|00003190| 73 74 61 20 20 20 6c 6f | 63 61 74 69 6f 6e 2b 31 |sta   lo|cation+1|
|000031a0| 20 20 20 20 3b 73 61 76 | 65 20 69 6e 20 7a 65 72 |    ;sav|e in zer|
|000031b0| 6f 20 70 61 67 65 20 61 | 73 20 68 69 67 68 20 62 |o page a|s high b|
|000031c0| 79 74 65 0d 32 30 33 36 | 3a 41 32 20 30 30 20 20 |yte.2036|:A2 00  |
|000031d0| 20 20 20 20 20 20 20 20 | 39 30 20 20 20 20 20 20 |        |90      |
|000031e0| 20 20 20 20 20 6c 64 78 | 20 20 20 23 30 20 20 20 |     ldx|   #0   |
|000031f0| 20 20 20 20 20 20 20 20 | 20 3b 69 6e 69 74 20 70 |        | ;init p|
|00003200| 6f 69 6e 74 65 72 20 74 | 6f 20 73 74 61 72 74 20 |ointer t|o start |
|00003210| 6f 66 20 49 44 20 74 61 | 62 6c 65 0d 32 30 33 38 |of ID ta|ble.2038|
|00003220| 3a 42 44 20 46 37 20 32 | 31 20 20 20 20 20 20 20 |:BD F7 2|1       |
|00003230| 39 31 20 6c 6f 6f 70 20 | 20 20 20 20 20 6c 64 61 |91 loop |     lda|
|00003240| 20 20 20 49 44 54 61 62 | 6c 65 2c 78 20 20 20 20 |   IDTab|le,x    |
|00003250| 20 3b 67 65 74 20 74 68 | 65 20 6d 61 63 68 69 6e | ;get th|e machin|
|00003260| 65 20 77 65 20 61 72 65 | 20 74 65 73 74 69 6e 67 |e we are| testing|
|00003270| 20 66 6f 72 0d 32 30 33 | 42 3a 38 44 20 45 38 20 | for.203|B:8D E8 |
|00003280| 32 31 20 20 20 20 20 20 | 20 39 32 20 20 20 20 20 |21      | 92     |
|00003290| 20 20 20 20 20 20 73 74 | 61 20 20 20 6d 61 63 68 |      st|a   mach|
|000032a0| 69 6e 65 20 20 20 20 20 | 20 20 3b 61 6e 64 20 73 |ine     |  ;and s|
|000032b0| 61 76 65 20 69 74 0d 32 | 30 33 45 3a 42 44 20 46 |ave it.2|03E:BD F|
|000032c0| 38 20 32 31 20 20 20 20 | 20 20 20 39 33 20 20 20 |8 21    |   93   |
|000032d0| 20 20 20 20 20 20 20 20 | 6c 64 61 20 20 20 49 44 |        |lda   ID|
|000032e0| 54 61 62 6c 65 2b 31 2c | 78 20 20 20 3b 67 65 74 |Table+1,|x   ;get|
|000032f0| 20 74 68 65 20 52 4f 4d | 20 6c 65 76 65 6c 20 77 | the ROM| level w|
|00003300| 65 20 61 72 65 20 74 65 | 73 74 69 6e 67 20 66 6f |e are te|sting fo|
|00003310| 72 0d 32 30 34 31 3a 38 | 44 20 45 39 20 32 31 20 |r.2041:8|D E9 21 |
|00003320| 20 20 20 20 20 20 39 34 | 20 20 20 20 20 20 20 20 |      94|        |
|00003330| 20 20 20 73 74 61 20 20 | 20 72 6f 6d 6c 65 76 65 |   sta  | romleve|
|00003340| 6c 20 20 20 20 20 20 3b | 61 6e 64 20 73 61 76 65 |l      ;|and save|
|00003350| 20 69 74 0d 32 30 34 34 | 3a 30 44 20 45 38 20 32 | it.2044|:0D E8 2|
|00003360| 31 20 20 20 20 20 20 20 | 39 35 20 20 20 20 20 20 |1       |95      |
|00003370| 20 20 20 20 20 6f 72 61 | 20 20 20 6d 61 63 68 69 |     ora|   machi|
|00003380| 6e 65 20 20 20 20 20 20 | 20 3b 61 72 65 20 62 6f |ne      | ;are bo|
|00003390| 74 68 20 7a 65 72 6f 3f | 0d 32 30 34 37 3a 46 30 |th zero?|.2047:F0|
|000033a0| 20 31 43 20 20 20 32 30 | 36 35 20 20 20 39 36 20 | 1C   20|65   96 |
|000033b0| 20 20 20 20 20 20 20 20 | 20 20 62 65 71 20 20 20 |        |  beq   |
|000033c0| 6d 61 74 63 68 65 64 20 | 20 20 20 20 20 20 3b 79 |matched |      ;y|
|000033d0| 65 73 20 2d 20 61 74 20 | 65 6e 64 20 6f 66 20 6c |es - at |end of l|
|000033e0| 69 73 74 20 2d 20 6c 65 | 61 76 65 0d 32 30 34 39 |ist - le|ave.2049|
|000033f0| 3a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |:       |        |
|00003400| 39 37 20 2a 0d 32 30 34 | 39 3a 45 38 20 20 20 20 |97 *.204|9:E8    |
|00003410| 20 20 20 20 20 20 20 20 | 20 39 38 20 6c 6f 6f 70 |        | 98 loop|
|00003420| 32 20 20 20 20 20 69 6e | 78 20 20 20 20 20 20 20 |2     in|x       |
|00003430| 20 20 20 20 20 20 20 20 | 20 20 3b 62 75 6d 70 20 |        |  ;bump |
|00003440| 69 6e 64 65 78 20 74 6f | 20 6c 6f 63 2f 62 79 74 |index to| loc/byt|
|00003450| 65 20 70 61 69 72 20 74 | 6f 20 74 65 73 74 0d 32 |e pair t|o test.2|
|00003460| 30 34 41 3a 45 38 20 20 | 20 20 20 20 20 20 20 20 |04A:E8  |        |
|00003470| 20 20 20 39 39 20 20 20 | 20 20 20 20 20 20 20 20 |   99   |        |
|00003480| 69 6e 78 0d 32 30 34 42 | 3a 42 44 20 46 37 20 32 |inx.204B|:BD F7 2|
|00003490| 31 20 20 20 20 20 20 31 | 30 30 20 20 20 20 20 20 |1      1|00      |
|000034a0| 20 20 20 20 20 6c 64 61 | 20 20 20 49 44 54 61 62 |     lda|   IDTab|
|000034b0| 6c 65 2c 78 20 20 20 20 | 20 3b 67 65 74 20 74 68 |le,x    | ;get th|
|000034c0| 65 20 62 79 74 65 20 74 | 68 61 74 20 73 68 6f 75 |e byte t|hat shou|
|000034d0| 6c 64 20 62 65 20 69 6e | 20 52 4f 4d 0d 32 30 34 |ld be in| ROM.204|
|000034e0| 45 3a 46 30 20 31 35 20 | 20 20 32 30 36 35 20 20 |E:F0 15 |  2065  |
|000034f0| 31 30 31 20 20 20 20 20 | 20 20 20 20 20 20 62 65 |101     |      be|
|00003500| 71 20 20 20 6d 61 74 63 | 68 65 64 20 20 20 20 20 |q   matc|hed     |
|00003510| 20 20 3b 69 66 20 7a 65 | 72 6f 2c 20 77 65 27 72 |  ;if ze|ro, we'r|
|00003520| 65 20 61 74 20 65 6e 64 | 20 6f 66 20 6c 69 73 74 |e at end| of list|
|00003530| 0d 32 30 35 30 3a 38 35 | 20 30 36 20 20 20 20 20 |.2050:85| 06     |
|00003540| 20 20 20 20 31 30 32 20 | 20 20 20 20 20 20 20 20 |    102 |        |
|00003550| 20 20 73 74 61 20 20 20 | 6c 6f 63 61 74 69 6f 6e |  sta   |location|
|00003560| 20 20 20 20 20 20 3b 73 | 61 76 65 20 69 6e 20 7a |      ;s|ave in z|
|00003570| 65 72 6f 20 70 61 67 65 | 0d 32 30 35 32 3a 20 20 |ero page|.2052:  |
|00003580| 20 20 20 20 20 20 20 20 | 20 20 20 20 31 30 33 20 |        |    103 |
|00003590| 2a 0d 32 30 35 32 3a 41 | 30 20 30 30 20 20 20 20 |*.2052:A|0 00    |
|000035a0| 20 20 20 20 20 31 30 34 | 20 20 20 20 20 20 20 20 |     104|        |
|000035b0| 20 20 20 6c 64 79 20 20 | 20 23 30 20 20 20 20 20 |   ldy  | #0     |
|000035c0| 20 20 20 20 20 20 20 3b | 69 6e 69 74 20 69 6e 64 |       ;|init ind|
|000035d0| 65 78 20 66 6f 72 20 69 | 6e 64 69 72 65 63 74 20 |ex for i|ndirect |
|000035e0| 61 64 64 72 65 73 73 69 | 6e 67 0d 32 30 35 34 3a |addressi|ng.2054:|
|000035f0| 42 44 20 46 38 20 32 31 | 20 20 20 20 20 20 31 30 |BD F8 21|      10|
|00003600| 35 20 20 20 20 20 20 20 | 20 20 20 20 6c 64 61 20 |5       |    lda |
|00003610| 20 20 49 44 54 61 62 6c | 65 2b 31 2c 78 20 20 20 |  IDTabl|e+1,x   |
|00003620| 3b 67 65 74 20 74 68 65 | 20 62 79 74 65 20 74 68 |;get the| byte th|
|00003630| 61 74 20 73 68 6f 75 6c | 64 20 62 65 20 69 6e 20 |at shoul|d be in |
|00003640| 52 4f 4d 0d 32 30 35 37 | 3a 44 31 20 30 36 20 20 |ROM.2057|:D1 06  |
|00003650| 20 20 20 20 20 20 20 31 | 30 36 20 20 20 20 20 20 |       1|06      |
|00003660| 20 20 20 20 20 63 6d 70 | 20 20 20 28 4c 6f 63 61 |     cmp|   (Loca|
|00003670| 74 69 6f 6e 29 2c 79 20 | 20 3b 69 73 20 69 74 20 |tion),y | ;is it |
|00003680| 74 68 65 72 65 3f 0d 32 | 30 35 39 3a 46 30 20 45 |there?.2|059:F0 E|
|00003690| 45 20 20 20 32 30 34 39 | 20 20 31 30 37 20 20 20 |E   2049|  107   |
|000036a0| 20 20 20 20 20 20 20 20 | 62 65 71 20 20 20 6c 6f |        |beq   lo|
|000036b0| 6f 70 32 20 20 20 20 20 | 20 20 20 20 3b 79 65 73 |op2     |    ;yes|
|000036c0| 2c 20 73 6f 20 6b 65 65 | 70 20 6f 6e 20 6c 6f 6f |, so kee|p on loo|
|000036d0| 70 69 6e 67 0d 32 30 35 | 42 3a 20 20 20 20 20 20 |ping.205|B:      |
|000036e0| 20 20 20 20 20 20 20 20 | 31 30 38 20 2a 0d 32 30 |        |108 *.20|
|000036f0| 35 42 3a 45 38 20 20 20 | 20 20 20 20 20 20 20 20 |5B:E8   |        |
|00003700| 20 31 30 39 20 6c 6f 6f | 70 33 20 20 20 20 20 69 | 109 loo|p3     i|
|00003710| 6e 78 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |nx      |        |
|00003720| 20 20 20 3b 77 65 20 64 | 69 64 6e 27 74 20 6d 61 |   ;we d|idn't ma|
|00003730| 74 63 68 2e 53 63 6f 6f | 74 20 74 6f 20 74 68 65 |tch.Scoo|t to the|
|00003740| 20 65 6e 64 20 6f 66 20 | 74 68 65 0d 32 30 35 43 | end of |the.205C|
|00003750| 3a 45 38 20 20 20 20 20 | 20 20 20 20 20 20 20 31 |:E8     |       1|
|00003760| 31 30 20 20 20 20 20 20 | 20 20 20 20 20 69 6e 78 |10      |     inx|
|00003770| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00003780| 20 3b 6c 69 6e 65 20 69 | 6e 20 74 68 65 20 49 44 | ;line i|n the ID|
|00003790| 20 74 61 62 6c 65 20 73 | 6f 20 77 65 20 63 61 6e | table s|o we can|
|000037a0| 20 73 74 61 72 74 0d 32 | 30 35 44 3a 42 44 20 46 | start.2|05D:BD F|
|000037b0| 37 20 32 31 20 20 20 20 | 20 20 31 31 31 20 20 20 |7 21    |  111   |
|000037c0| 20 20 20 20 20 20 20 20 | 6c 64 61 20 20 20 49 44 |        |lda   ID|
|000037d0| 54 61 62 6c 65 2c 78 20 | 20 20 20 20 3b 63 68 65 |Table,x |    ;che|
|000037e0| 63 6b 69 6e 67 20 66 6f | 72 20 61 6e 6f 74 68 65 |cking fo|r anothe|
|000037f0| 72 20 6d 61 63 68 69 6e | 65 0d 32 30 36 30 3a 44 |r machin|e.2060:D|
|00003800| 30 20 46 39 20 20 20 32 | 30 35 42 20 20 31 31 32 |0 F9   2|05B  112|
|00003810| 20 20 20 20 20 20 20 20 | 20 20 20 62 6e 65 20 20 |        |   bne  |
|00003820| 20 6c 6f 6f 70 33 0d 32 | 30 36 32 3a 45 38 20 20 | loop3.2|062:E8  |
|00003830| 20 20 20 20 20 20 20 20 | 20 20 31 31 33 20 20 20 |        |  113   |
|00003840| 20 20 20 20 20 20 20 20 | 69 6e 78 20 20 20 20 20 |        |inx     |
|00003850| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 3b 70 6f |        |     ;po|
|00003860| 69 6e 74 20 74 6f 20 73 | 74 61 72 74 20 6f 66 20 |int to s|tart of |
|00003870| 6e 65 78 74 20 6c 69 6e | 65 0d 32 30 36 33 3a 44 |next lin|e.2063:D|
|00003880| 30 20 44 33 20 20 20 32 | 30 33 38 20 20 31 31 34 |0 D3   2|038  114|
|00003890| 20 20 20 20 20 20 20 20 | 20 20 20 62 6e 65 20 20 |        |   bne  |
|000038a0| 20 6c 6f 6f 70 20 20 20 | 20 20 20 20 20 20 20 3b | loop   |       ;|
|000038b0| 73 68 6f 75 6c 64 20 61 | 6c 77 61 79 73 20 62 65 |should a|lways be|
|000038c0| 20 74 61 6b 65 6e 0d 32 | 30 36 35 3a 20 20 20 20 | taken.2|065:    |
|000038d0| 20 20 20 20 20 20 20 20 | 20 20 31 31 35 20 2a 0d |        |  115 *.|
|000038e0| 32 30 36 35 3a 20 20 20 | 20 20 20 20 20 32 30 36 |2065:   |     206|
|000038f0| 35 20 20 31 31 36 20 6d | 61 74 63 68 65 64 20 20 |5  116 m|atched  |
|00003900| 20 65 71 75 20 20 20 2a | 20 0d 32 30 36 35 3a 20 | equ   *| .2065: |
|00003910| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 31 31 37 |        |     117|
|00003920| 20 2a 0d 32 30 36 35 3a | 20 20 20 20 20 20 20 20 | *.2065:|        |
|00003930| 20 20 20 20 20 20 31 31 | 38 20 2a 20 20 48 65 72 |      11|8 *  Her|
|00003940| 65 20 77 65 20 63 68 65 | 63 6b 20 74 68 65 20 31 |e we che|ck the 1|
|00003950| 36 2d 62 69 74 20 49 44 | 20 72 6f 75 74 69 6e 65 |6-bit ID| routine|
|00003960| 20 61 74 20 24 46 45 31 | 46 2e 20 20 49 66 20 69 | at $FE1|F.  If i|
|00003970| 74 0d 32 30 36 35 3a 20 | 20 20 20 20 20 20 20 20 |t.2065: |        |
|00003980| 20 20 20 20 20 31 31 39 | 20 2a 20 20 72 65 74 75 |     119| *  retu|
|00003990| 72 6e 73 20 77 69 74 68 | 20 63 61 72 72 79 20 63 |rns with| carry c|
|000039a0| 6c 65 61 72 2c 20 77 65 | 20 63 61 6c 6c 20 69 74 |lear, we| call it|
|000039b0| 20 61 67 61 69 6e 20 69 | 6e 20 31 36 2d 62 69 74 | again i|n 16-bit|
|000039c0| 0d 32 30 36 35 3a 20 20 | 20 20 20 20 20 20 20 20 |.2065:  |        |
|000039d0| 20 20 20 20 31 32 30 20 | 2a 20 20 6d 6f 64 65 20 |    120 |*  mode |
|000039e0| 74 6f 20 70 72 6f 76 69 | 64 65 20 6d 6f 72 65 20 |to provi|de more |
|000039f0| 69 6e 66 6f 72 6d 61 74 | 69 6f 6e 20 6f 6e 20 74 |informat|ion on t|
|00003a00| 68 65 20 6d 61 63 68 69 | 6e 65 2e 0d 32 30 36 35 |he machi|ne..2065|
|00003a10| 3a 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 31 |:       |       1|
|00003a20| 32 31 20 2a 0d 32 30 36 | 35 3a 33 38 20 20 20 20 |21 *.206|5:38    |
|00003a30| 20 20 20 20 20 20 20 20 | 31 32 32 20 69 64 49 49 |        |122 idII|
|00003a40| 67 73 20 20 20 20 73 65 | 63 20 20 20 20 20 20 20 |gs    se|c       |
|00003a50| 20 20 20 20 20 20 20 20 | 20 20 3b 73 65 74 20 74 |        |  ;set t|
|00003a60| 68 65 20 63 61 72 72 79 | 20 62 69 74 0d 32 30 36 |he carry| bit.206|
|00003a70| 36 3a 32 30 20 31 46 20 | 46 45 20 20 20 20 20 20 |6:20 1F |FE      |
|00003a80| 31 32 33 20 20 20 20 20 | 20 20 20 20 20 20 6a 73 |123     |      js|
|00003a90| 72 20 20 20 69 64 72 6f | 75 74 69 6e 65 20 20 20 |r   idro|utine   |
|00003aa0| 20 20 3b 41 70 70 6c 65 | 20 49 49 67 73 20 49 44 |  ;Apple| IIgs ID|
|00003ab0| 20 52 6f 75 74 69 6e 65 | 0d 32 30 36 39 3a 39 30 | Routine|.2069:90|
|00003ac0| 20 30 33 20 20 20 32 30 | 36 45 20 20 31 32 34 20 | 03   20|6E  124 |
|00003ad0| 20 20 20 20 20 20 20 20 | 20 20 62 63 63 20 20 20 |        |  bcc   |
|00003ae0| 69 64 49 49 67 73 32 20 | 20 20 20 20 20 20 3b 69 |idIIgs2 |      ;i|
|00003af0| 74 27 73 20 61 20 49 49 | 67 73 20 6f 72 20 65 71 |t's a II|gs or eq|
|00003b00| 75 69 76 61 6c 65 6e 74 | 0d 32 30 36 42 3a 34 43 |uivalent|.206B:4C|
|00003b10| 20 41 32 20 32 30 20 20 | 20 20 20 20 31 32 35 20 | A2 20  |    125 |
|00003b20| 20 20 20 20 20 20 20 20 | 20 20 6a 6d 70 20 20 20 |        |  jmp   |
|00003b30| 65 78 69 74 20 20 20 20 | 20 20 20 20 20 20 3b 6e |exit    |      ;n|
|00003b40| 6f 70 65 2c 20 67 6f 20 | 63 68 65 63 6b 20 6d 65 |ope, go |check me|
|00003b50| 6d 6f 72 79 0d 32 30 36 | 45 3a 41 44 20 45 38 20 |mory.206|E:AD E8 |
|00003b60| 32 31 20 20 20 20 20 20 | 31 32 36 20 69 64 49 49 |21      |126 idII|
|00003b70| 67 73 32 20 20 20 6c 64 | 61 20 20 20 6d 61 63 68 |gs2   ld|a   mach|
|00003b80| 69 6e 65 20 20 20 20 20 | 20 20 3b 67 65 74 20 74 |ine     |  ;get t|
|00003b90| 68 65 20 76 61 6c 75 65 | 20 66 6f 72 20 6d 61 63 |he value| for mac|
|00003ba0| 68 69 6e 65 0d 32 30 37 | 31 3a 30 39 20 38 30 20 |hine.207|1:09 80 |
|00003bb0| 20 20 20 20 20 20 20 20 | 31 32 37 20 20 20 20 20 |        |127     |
|00003bc0| 20 20 20 20 20 20 6f 72 | 61 20 20 20 23 24 38 30 |      or|a   #$80|
|00003bd0| 20 20 20 20 20 20 20 20 | 20 20 3b 61 6e 64 20 73 |        |  ;and s|
|00003be0| 65 74 20 74 68 65 20 68 | 69 67 68 20 62 69 74 0d |et the h|igh bit.|
|00003bf0| 32 30 37 33 3a 38 44 20 | 45 38 20 32 31 20 20 20 |2073:8D |E8 21   |
|00003c00| 20 20 20 31 32 38 20 20 | 20 20 20 20 20 20 20 20 |   128  |        |
|00003c10| 20 73 74 61 20 20 20 6d | 61 63 68 69 6e 65 20 20 | sta   m|achine  |
|00003c20| 20 20 20 20 20 3b 70 75 | 74 20 69 74 20 62 61 63 |     ;pu|t it bac|
|00003c30| 6b 0d 32 30 37 36 3a 31 | 38 20 20 20 20 20 20 20 |k.2076:1|8       |
|00003c40| 20 20 20 20 20 31 32 39 | 20 20 20 20 20 20 20 20 |     129|        |
|00003c50| 20 20 20 63 6c 63 20 20 | 20 20 20 20 20 20 20 20 |   clc  |        |
|00003c60| 20 20 20 20 20 20 20 3b | 67 65 74 20 72 65 61 64 |       ;|get read|
|00003c70| 79 20 74 6f 20 73 77 69 | 74 63 68 20 69 6e 74 6f |y to swi|tch into|
|00003c80| 20 6e 61 74 69 76 65 20 | 6d 6f 64 65 0d 32 30 37 | native |mode.207|
|00003c90| 37 3a 46 42 20 20 20 20 | 20 20 20 20 20 20 20 20 |7:FB    |        |
|00003ca0| 31 33 30 20 20 20 20 20 | 20 20 20 20 20 20 64 66 |130     |      df|
|00003cb0| 62 20 20 20 78 63 65 20 | 20 20 20 20 20 20 20 20 |b   xce |        |
|00003cc0| 20 20 3b 74 68 69 73 20 | 69 73 20 61 20 36 35 38 |  ;this |is a 658|
|00003cd0| 31 36 20 58 43 45 20 69 | 6e 73 74 72 75 63 74 69 |16 XCE i|nstructi|
|00003ce0| 6f 6e 0d 32 30 37 38 3a | 30 38 20 20 20 20 20 20 |on.2078:|08      |
|00003cf0| 20 20 20 20 20 20 31 33 | 31 20 20 20 20 20 20 20 |      13|1       |
|00003d00| 20 20 20 20 70 68 70 20 | 20 20 20 20 20 20 20 20 |    php |        |
|00003d10| 20 20 20 20 20 20 20 20 | 3b 73 61 76 65 20 74 68 |        |;save th|
|00003d20| 65 20 70 72 6f 63 65 73 | 73 6f 72 20 73 74 61 74 |e proces|sor stat|
|00003d30| 75 73 0d 32 30 37 39 3a | 43 32 20 33 30 20 20 20 |us.2079:|C2 30   |
|00003d40| 20 20 20 20 20 20 31 33 | 32 20 20 20 20 20 20 20 |      13|2       |
|00003d50| 20 20 20 20 64 66 62 20 | 20 20 24 43 32 2c 24 33 |    dfb |  $C2,$3|
|00003d60| 30 20 20 20 20 20 20 20 | 3b 52 45 50 20 33 30 2c |0       |;REP 30,|
|00003d70| 20 73 65 74 73 20 31 36 | 2d 62 69 74 20 72 65 67 | sets 16|-bit reg|
|00003d80| 69 73 74 65 72 73 0d 32 | 30 37 42 3a 32 30 20 31 |isters.2|07B:20 1|
|00003d90| 46 20 46 45 20 20 20 20 | 20 20 31 33 33 20 20 20 |F FE    |  133   |
|00003da0| 20 20 20 20 20 20 20 20 | 6a 73 72 20 20 20 24 46 |        |jsr   $F|
|00003db0| 45 31 66 20 20 20 20 20 | 20 20 20 20 3b 63 61 6c |E1f     |    ;cal|
|00003dc0| 6c 20 74 68 65 20 49 44 | 20 72 6f 75 74 69 6e 65 |l the ID| routine|
|00003dd0| 20 61 67 61 69 6e 0d 32 | 30 37 45 3a 38 44 20 45 | again.2|07E:8D E|
|00003de0| 42 20 32 31 20 20 20 20 | 20 20 31 33 34 20 20 20 |B 21    |  134   |
|00003df0| 20 20 20 20 20 20 20 20 | 73 74 61 20 20 20 49 49 |        |sta   II|
|00003e00| 67 73 41 20 20 20 20 20 | 20 20 20 20 3b 31 36 2d |gsA     |    ;16-|
|00003e10| 62 69 74 20 73 74 6f 72 | 65 21 0d 32 30 38 31 3a |bit stor|e!.2081:|
|00003e20| 38 45 20 45 44 20 32 31 | 20 20 20 20 20 20 31 33 |8E ED 21|      13|
|00003e30| 35 20 20 20 20 20 20 20 | 20 20 20 20 73 74 78 20 |5       |    stx |
|00003e40| 20 20 49 49 67 73 58 20 | 20 20 20 20 20 20 20 20 |  IIgsX |        |
|00003e50| 3b 31 36 2d 62 69 74 20 | 73 74 6f 72 65 21 0d 32 |;16-bit |store!.2|
|00003e60| 30 38 34 3a 38 43 20 45 | 46 20 32 31 20 20 20 20 |084:8C E|F 21    |
|00003e70| 20 20 31 33 36 20 20 20 | 20 20 20 20 20 20 20 20 |  136   |        |
|00003e80| 73 74 79 20 20 20 49 49 | 67 73 59 20 20 20 20 20 |sty   II|gsY     |
|00003e90| 20 20 20 20 3b 31 36 2d | 62 69 74 20 73 74 6f 72 |    ;16-|bit stor|
|00003ea0| 65 21 0d 32 30 38 37 3a | 32 38 20 20 20 20 20 20 |e!.2087:|28      |
|00003eb0| 20 20 20 20 20 20 31 33 | 37 20 20 20 20 20 20 20 |      13|7       |
|00003ec0| 20 20 20 20 70 6c 70 20 | 20 20 20 20 20 20 20 20 |    plp |        |
|00003ed0| 20 20 20 20 20 20 20 20 | 3b 72 65 73 74 6f 72 65 |        |;restore|
|00003ee0| 73 20 38 2d 62 69 74 20 | 72 65 67 69 73 74 65 72 |s 8-bit |register|
|00003ef0| 73 0d 32 30 38 38 3a 46 | 42 20 20 20 20 20 20 20 |s.2088:F|B       |
|00003f00| 20 20 20 20 20 31 33 38 | 20 20 20 20 20 20 20 20 |     138|        |
|00003f10| 20 20 20 64 66 62 20 20 | 20 78 63 65 20 20 20 20 |   dfb  | xce    |
|00003f20| 20 20 20 20 20 20 20 3b | 73 77 69 74 63 68 65 73 |       ;|switches|
|00003f30| 20 62 61 63 6b 20 74 6f | 20 77 68 61 74 65 76 65 | back to| whateve|
|00003f40| 72 20 69 74 20 77 61 73 | 20 62 65 66 6f 72 65 0d |r it was| before.|
|00003f50| 32 30 38 39 3a 20 20 20 | 20 20 20 20 20 20 20 20 |2089:   |        |
|00003f60| 20 20 20 31 33 39 20 2a | 0d 32 30 38 39 3a 41 43 |   139 *|.2089:AC|
|00003f70| 20 45 46 20 32 31 20 20 | 20 20 20 20 31 34 30 20 | EF 21  |    140 |
|00003f80| 20 20 20 20 20 20 20 20 | 20 20 6c 64 79 20 20 20 |        |  ldy   |
|00003f90| 49 49 67 73 59 20 20 20 | 20 20 20 20 20 20 3b 67 |IIgsY   |      ;g|
|00003fa0| 65 74 20 74 68 65 20 52 | 4f 4d 20 76 65 72 73 20 |et the R|OM vers |
|00003fb0| 6e 75 6d 62 65 72 20 28 | 73 74 61 72 74 73 20 61 |number (|starts a|
|00003fc0| 74 20 30 29 0d 32 30 38 | 43 3a 43 30 20 30 32 20 |t 0).208|C:C0 02 |
|00003fd0| 20 20 20 20 20 20 20 20 | 31 34 31 20 20 20 20 20 |        |141     |
|00003fe0| 20 20 20 20 20 20 63 70 | 79 20 20 20 23 24 30 32 |      cp|y   #$02|
|00003ff0| 20 20 20 20 20 20 20 20 | 20 20 3b 69 73 20 69 74 |        |  ;is it|
|00004000| 20 52 4f 4d 20 30 31 20 | 6f 72 20 30 30 3f 0d 32 | ROM 01 |or 00?.2|
|00004010| 30 38 45 3a 42 30 20 30 | 31 20 20 20 32 30 39 31 |08E:B0 0|1   2091|
|00004020| 20 20 31 34 32 20 20 20 | 20 20 20 20 20 20 20 20 |  142   |        |
|00004030| 62 63 73 20 20 20 69 64 | 49 49 67 73 33 20 20 20 |bcs   id|IIgs3   |
|00004040| 20 20 20 20 3b 69 66 20 | 6e 6f 74 2c 20 64 6f 6e |    ;if |not, don|
|00004050| 27 74 20 69 6e 63 72 65 | 6d 65 6e 74 0d 32 30 39 |'t incre|ment.209|
|00004060| 30 3a 43 38 20 20 20 20 | 20 20 20 20 20 20 20 20 |0:C8    |        |
|00004070| 31 34 33 20 20 20 20 20 | 20 20 20 20 20 20 69 6e |143     |      in|
|00004080| 79 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |y       |        |
|00004090| 20 20 3b 62 75 6d 70 20 | 69 74 20 75 70 20 66 6f |  ;bump |it up fo|
|000040a0| 72 20 72 6f 6d 6c 65 76 | 65 6c 0d 32 30 39 31 3a |r romlev|el.2091:|
|000040b0| 38 43 20 45 39 20 32 31 | 20 20 20 20 20 20 31 34 |8C E9 21|      14|
|000040c0| 34 20 69 64 49 49 67 73 | 33 20 20 20 73 74 79 20 |4 idIIgs|3   sty |
|000040d0| 20 20 72 6f 6d 6c 65 76 | 65 6c 20 20 20 20 20 20 |  romlev|el      |
|000040e0| 3b 61 6e 64 20 70 75 74 | 20 69 74 20 74 68 65 72 |;and put| it ther|
|000040f0| 65 0d 32 30 39 34 3a 43 | 30 20 30 31 20 20 20 20 |e.2094:C|0 01    |
|00004100| 20 20 20 20 20 31 34 35 | 20 20 20 20 20 20 20 20 |     145|        |
|00004110| 20 20 20 63 70 79 20 20 | 20 23 24 30 31 20 20 20 |   cpy  | #$01   |
|00004120| 20 20 20 20 20 20 20 3b | 69 73 20 69 74 20 74 68 |       ;|is it th|
|00004130| 65 20 66 69 72 73 74 20 | 52 4f 4d 3f 0d 32 30 39 |e first |ROM?.209|
|00004140| 36 3a 44 30 20 30 41 20 | 20 20 32 30 41 32 20 20 |6:D0 0A |  20A2  |
|00004150| 31 34 36 20 20 20 20 20 | 20 20 20 20 20 20 62 6e |146     |      bn|
|00004160| 65 20 20 20 49 49 67 73 | 4f 75 74 20 20 20 20 20 |e   IIgs|Out     |
|00004170| 20 20 3b 6e 6f 2c 20 67 | 6f 20 6f 6e 20 77 69 74 |  ;no, g|o on wit|
|00004180| 68 20 74 68 69 6e 67 73 | 0d 32 30 39 38 3a 41 44 |h things|.2098:AD|
|00004190| 20 46 30 20 32 31 20 20 | 20 20 20 20 31 34 37 20 | F0 21  |    147 |
|000041a0| 20 20 20 20 20 20 20 20 | 20 20 6c 64 61 20 20 20 |        |  lda   |
|000041b0| 49 49 67 73 59 2b 31 20 | 20 20 20 20 20 20 3b 63 |IIgsY+1 |      ;c|
|000041c0| 68 65 63 6b 20 74 68 65 | 20 6f 74 68 65 72 20 62 |heck the| other b|
|000041d0| 79 74 65 20 74 6f 6f 0d | 32 30 39 42 3a 44 30 20 |yte too.|209B:D0 |
|000041e0| 30 35 20 20 20 32 30 41 | 32 20 20 31 34 38 20 20 |05   20A|2  148  |
|000041f0| 20 20 20 20 20 20 20 20 | 20 62 6e 65 20 20 20 49 |        | bne   I|
|00004200| 49 67 73 4f 75 74 20 20 | 20 20 20 20 20 3b 6e 6f |IgsOut  |     ;no|
|00004210| 70 65 2c 20 69 74 27 73 | 20 61 20 49 49 67 73 20 |pe, it's| a IIgs |
|00004220| 73 75 63 63 65 73 73 6f | 72 0d 32 30 39 44 3a 41 |successo|r.209D:A|
|00004230| 39 20 37 46 20 20 20 20 | 20 20 20 20 20 31 34 39 |9 7F    |     149|
|00004240| 20 20 20 20 20 20 20 20 | 20 20 20 6c 64 61 20 20 |        |   lda  |
|00004250| 20 23 24 37 46 20 20 20 | 20 20 20 20 20 20 20 3b | #$7F   |       ;|
|00004260| 66 69 78 20 66 61 75 6c | 74 79 20 52 4f 4d 20 30 |fix faul|ty ROM 0|
|00004270| 30 20 6f 6e 20 74 68 65 | 20 49 49 67 73 0d 32 30 |0 on the| IIgs.20|
|00004280| 39 46 3a 38 44 20 45 42 | 20 32 31 20 20 20 20 20 |9F:8D EB| 21     |
|00004290| 20 31 35 30 20 20 20 20 | 20 20 20 20 20 20 20 73 | 150    |       s|
|000042a0| 74 61 20 20 20 49 49 67 | 73 41 0d 32 30 41 32 3a |ta   IIg|sA.20A2:|
|000042b0| 20 20 20 20 20 20 20 20 | 32 30 41 32 20 20 31 35 |        |20A2  15|
|000042c0| 31 20 49 49 67 73 4f 75 | 74 20 20 20 65 71 75 20 |1 IIgsOu|t   equ |
|000042d0| 20 20 2a 0d 32 30 41 32 | 3a 20 20 20 20 20 20 20 |  *.20A2|:       |
|000042e0| 20 20 20 20 20 20 20 31 | 35 32 20 2a 0d 32 30 41 |       1|52 *.20A|
|000042f0| 32 3a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |2:      |        |
|00004300| 31 35 33 20 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |153 ****|********|
|00004310| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00004320| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 0d 32 |********|******.2|
|00004330| 30 41 32 3a 20 20 20 20 | 20 20 20 20 20 20 20 20 |0A2:    |        |
|00004340| 20 20 31 35 34 20 2a 20 | 54 68 69 73 20 70 61 72 |  154 * |This par|
|00004350| 74 20 6f 66 20 74 68 65 | 20 63 6f 64 65 20 63 68 |t of the| code ch|
|00004360| 65 63 6b 73 20 66 6f 72 | 20 74 68 65 20 20 20 2a |ecks for| the   *|
|00004370| 0d 32 30 41 32 3a 20 20 | 20 20 20 20 20 20 20 20 |.20A2:  |        |
|00004380| 20 20 20 20 31 35 35 20 | 2a 20 6d 65 6d 6f 72 79 |    155 |* memory|
|00004390| 20 63 6f 6e 66 69 67 75 | 72 61 74 69 6f 6e 20 6f | configu|ration o|
|000043a0| 66 20 74 68 65 20 6d 61 | 63 68 69 6e 65 2e 20 20 |f the ma|chine.  |
|000043b0| 20 2a 0d 32 30 41 32 3a | 20 20 20 20 20 20 20 20 | *.20A2:|        |
|000043c0| 20 20 20 20 20 20 31 35 | 36 20 2a 20 49 66 20 69 |      15|6 * If i|
|000043d0| 74 27 73 20 61 20 49 49 | 67 73 2c 20 77 65 27 76 |t's a II|gs, we'v|
|000043e0| 65 20 61 6c 72 65 61 64 | 79 20 73 74 6f 72 65 64 |e alread|y stored|
|000043f0| 20 20 20 2a 0d 32 30 41 | 32 3a 20 20 20 20 20 20 |   *.20A|2:      |
|00004400| 20 20 20 20 20 20 20 20 | 31 35 37 20 2a 20 74 68 |        |157 * th|
|00004410| 65 20 74 6f 74 61 6c 20 | 6d 65 6d 6f 72 79 20 66 |e total |memory f|
|00004420| 72 6f 6d 20 61 62 6f 76 | 65 2e 20 20 49 66 20 69 |rom abov|e.  If i|
|00004430| 74 27 73 20 20 2a 0d 32 | 30 41 32 3a 20 20 20 20 |t's  *.2|0A2:    |
|00004440| 20 20 20 20 20 20 20 20 | 20 20 31 35 38 20 2a 20 |        |  158 * |
|00004450| 61 20 49 49 63 2c 20 77 | 65 20 6b 6e 6f 77 20 69 |a IIc, w|e know i|
|00004460| 74 27 73 20 31 32 38 4b | 3b 20 69 66 20 69 74 27 |t's 128K|; if it'|
|00004470| 73 20 61 20 20 20 20 2a | 0d 32 30 41 32 3a 20 20 |s a    *|.20A2:  |
|00004480| 20 20 20 20 20 20 20 20 | 20 20 20 20 31 35 39 20 |        |    159 |
|00004490| 2a 20 5d 5b 2b 2c 20 77 | 65 20 6b 6e 6f 77 20 69 |* ][+, w|e know i|
|000044a0| 74 27 73 20 61 74 20 6c | 65 61 73 74 20 34 38 4b |t's at l|east 48K|
|000044b0| 20 61 6e 64 20 20 20 20 | 20 2a 0d 32 30 41 32 3a | and    | *.20A2:|
|000044c0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 31 36 |        |      16|
|000044d0| 30 20 2a 20 6d 61 79 62 | 65 20 36 34 4b 2e 20 20 |0 * mayb|e 64K.  |
|000044e0| 57 65 20 77 6f 6e 27 74 | 20 63 68 65 63 6b 20 66 |We won't| check f|
|000044f0| 6f 72 20 6c 65 73 73 20 | 20 20 20 2a 0d 32 30 41 |or less |   *.20A|
|00004500| 32 3a 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |2:      |        |
|00004510| 31 36 31 20 2a 20 74 68 | 61 6e 20 34 38 4b 2c 20 |161 * th|an 48K, |
|00004520| 73 69 6e 63 65 20 74 68 | 61 74 27 73 20 61 20 72 |since th|at's a r|
|00004530| 65 61 6c 6c 79 20 72 61 | 72 65 20 20 20 2a 0d 32 |eally ra|re   *.2|
|00004540| 30 41 32 3a 20 20 20 20 | 20 20 20 20 20 20 20 20 |0A2:    |        |
|00004550| 20 20 31 36 32 20 2a 20 | 63 69 72 63 75 6d 73 74 |  162 * |circumst|
|00004560| 61 6e 63 65 2e 20 20 20 | 20 20 20 20 20 20 20 20 |ance.   |        |
|00004570| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 2a |        |       *|
|00004580| 0d 32 30 41 32 3a 20 20 | 20 20 20 20 20 20 20 20 |.20A2:  |        |
|00004590| 20 20 20 20 31 36 33 20 | 2a 2a 2a 2a 2a 2a 2a 2a |    163 |********|
|000045a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000045b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000045c0| 2a 2a 0d 32 30 41 32 3a | 20 20 20 20 20 20 20 20 |**.20A2:|        |
|000045d0| 20 20 20 20 20 20 31 36 | 34 20 2a 0d 32 30 41 32 |      16|4 *.20A2|
|000045e0| 3a 41 44 20 45 38 20 32 | 31 20 20 20 20 20 20 31 |:AD E8 2|1      1|
|000045f0| 36 35 20 65 78 69 74 20 | 20 20 20 20 20 6c 64 61 |65 exit |     lda|
|00004600| 20 20 20 6d 61 63 68 69 | 6e 65 20 20 20 20 20 20 |   machi|ne      |
|00004610| 20 3b 67 65 74 20 74 68 | 65 20 6d 61 63 68 69 6e | ;get th|e machin|
|00004620| 65 20 6b 69 6e 64 0d 32 | 30 41 35 3a 33 30 20 31 |e kind.2|0A5:30 1|
|00004630| 34 20 20 20 32 30 42 42 | 20 20 31 36 36 20 20 20 |4   20BB|  166   |
|00004640| 20 20 20 20 20 20 20 20 | 62 6d 69 20 20 20 65 78 |        |bmi   ex|
|00004650| 69 74 31 32 38 20 20 20 | 20 20 20 20 3b 69 74 27 |it128   |    ;it'|
|00004660| 73 20 61 20 31 36 2d 62 | 69 74 20 6d 61 63 68 69 |s a 16-b|it machi|
|00004670| 6e 65 20 28 68 61 73 20 | 31 32 38 4b 29 0d 32 30 |ne (has |128K).20|
|00004680| 41 37 3a 43 39 20 30 35 | 20 20 20 20 20 20 20 20 |A7:C9 05|        |
|00004690| 20 31 36 37 20 20 20 20 | 20 20 20 20 20 20 20 63 | 167    |       c|
|000046a0| 6d 70 20 20 20 23 49 49 | 63 20 20 20 20 20 20 20 |mp   #II|c       |
|000046b0| 20 20 20 3b 69 73 20 69 | 74 20 61 20 49 49 63 3f |   ;is i|t a IIc?|
|000046c0| 0d 32 30 41 39 3a 46 30 | 20 31 30 20 20 20 32 30 |.20A9:F0| 10   20|
|000046d0| 42 42 20 20 31 36 38 20 | 20 20 20 20 20 20 20 20 |BB  168 |        |
|000046e0| 20 20 62 65 71 20 20 20 | 65 78 69 74 31 32 38 20 |  beq   |exit128 |
|000046f0| 20 20 20 20 20 20 3b 79 | 75 70 2c 20 69 74 27 73 |      ;y|up, it's|
|00004700| 20 67 6f 74 20 31 32 38 | 4b 0d 32 30 41 42 3a 43 | got 128|K.20AB:C|
|00004710| 39 20 30 34 20 20 20 20 | 20 20 20 20 20 31 36 39 |9 04    |     169|
|00004720| 20 20 20 20 20 20 20 20 | 20 20 20 63 6d 70 20 20 |        |   cmp  |
|00004730| 20 23 49 49 65 20 20 20 | 20 20 20 20 20 20 20 3b | #IIe   |       ;|
|00004740| 69 73 20 69 74 20 61 20 | 49 49 65 3f 0d 32 30 41 |is it a |IIe?.20A|
|00004750| 44 3a 44 30 20 30 33 20 | 20 20 32 30 42 32 20 20 |D:D0 03 |  20B2  |
|00004760| 31 37 30 20 20 20 20 20 | 20 20 20 20 20 20 62 6e |170     |      bn|
|00004770| 65 20 20 20 63 6f 6e 74 | 65 78 69 74 20 20 20 20 |e   cont|exit    |
|00004780| 20 20 3b 79 65 73 2c 20 | 67 6f 20 6d 75 63 6b 20 |  ;yes, |go muck |
|00004790| 77 69 74 68 20 61 75 78 | 20 6d 65 6d 6f 72 79 0d |with aux| memory.|
|000047a0| 32 30 41 46 3a 34 43 20 | 34 45 20 32 31 20 20 20 |20AF:4C |4E 21   |
|000047b0| 20 20 20 31 37 31 20 20 | 20 20 20 20 20 20 20 20 |   171  |        |
|000047c0| 20 6a 6d 70 20 20 20 6d | 75 63 6b 61 75 78 0d 32 | jmp   m|uckaux.2|
|000047d0| 30 42 32 3a 43 39 20 30 | 33 20 20 20 20 20 20 20 |0B2:C9 0|3       |
|000047e0| 20 20 31 37 32 20 63 6f | 6e 74 65 78 69 74 20 20 |  172 co|ntexit  |
|000047f0| 63 6d 70 20 20 20 23 49 | 49 49 65 6d 20 20 20 20 |cmp   #I|IIem    |
|00004800| 20 20 20 20 3b 69 73 20 | 69 74 20 61 20 2f 2f 2f |    ;is |it a ///|
|00004810| 20 69 6e 20 65 6d 75 6c | 61 74 69 6f 6e 3f 0d 32 | in emul|ation?.2|
|00004820| 30 42 34 3a 44 30 20 36 | 45 20 20 20 32 31 32 34 |0B4:D0 6|E   2124|
|00004830| 20 20 31 37 33 20 20 20 | 20 20 20 20 20 20 20 20 |  173   |        |
|00004840| 62 6e 65 20 20 20 65 78 | 69 74 49 49 20 20 20 20 |bne   ex|itII    |
|00004850| 20 20 20 20 3b 6e 6f 70 | 65 2c 20 69 74 27 73 20 |    ;nop|e, it's |
|00004860| 61 20 5d 5b 20 6f 72 20 | 5d 5b 2b 0d 32 30 42 36 |a ][ or |][+.20B6|
|00004870| 3a 41 39 20 33 30 20 20 | 20 20 20 20 20 20 20 31 |:A9 30  |       1|
|00004880| 37 34 20 20 20 20 20 20 | 20 20 20 20 20 6c 64 61 |74      |     lda|
|00004890| 20 20 20 23 34 38 20 20 | 20 20 20 20 20 20 20 20 |   #48  |        |
|000048a0| 20 3b 2f 2f 2f 20 65 6d | 75 6c 61 74 69 6f 6e 20 | ;/// em|ulation |
|000048b0| 68 61 73 20 34 38 4b 0d | 32 30 42 38 3a 34 43 20 |has 48K.|20B8:4C |
|000048c0| 42 44 20 32 30 20 20 20 | 20 20 20 31 37 35 20 20 |BD 20   |   175  |
|000048d0| 20 20 20 20 20 20 20 20 | 20 6a 6d 70 20 20 20 65 |        | jmp   e|
|000048e0| 78 69 74 61 0d 32 30 42 | 42 3a 41 39 20 38 30 20 |xita.20B|B:A9 80 |
|000048f0| 20 20 20 20 20 20 20 20 | 31 37 36 20 65 78 69 74 |        |176 exit|
|00004900| 31 32 38 20 20 20 6c 64 | 61 20 20 20 23 31 32 38 |128   ld|a   #128|
|00004910| 20 20 20 20 20 20 20 20 | 20 20 3b 31 32 38 4b 20 |        |  ;128K |
|00004920| 0d 32 30 42 44 3a 38 44 | 20 45 41 20 32 31 20 20 |.20BD:8D| EA 21  |
|00004930| 20 20 20 20 31 37 37 20 | 65 78 69 74 61 20 20 20 |    177 |exita   |
|00004940| 20 20 73 74 61 20 20 20 | 6d 65 6d 6f 72 79 0d 32 |  sta   |memory.2|
|00004950| 30 43 30 3a 41 44 20 30 | 30 20 45 30 20 20 20 20 |0C0:AD 0|0 E0    |
|00004960| 20 20 31 37 38 20 65 78 | 69 74 31 20 20 20 20 20 |  178 ex|it1     |
|00004970| 6c 64 61 20 20 20 6c 63 | 31 20 20 20 20 20 20 20 |lda   lc|1       |
|00004980| 20 20 20 20 3b 74 69 6d | 65 20 74 6f 20 72 65 73 |    ;tim|e to res|
|00004990| 74 6f 72 65 20 74 68 65 | 20 4c 43 0d 32 30 43 33 |tore the| LC.20C3|
|000049a0| 3a 43 44 20 46 31 20 32 | 31 20 20 20 20 20 20 31 |:CD F1 2|1      1|
|000049b0| 37 39 20 20 20 20 20 20 | 20 20 20 20 20 63 6d 70 |79      |     cmp|
|000049c0| 20 20 20 73 61 76 65 20 | 20 20 20 20 20 20 20 20 |   save |        |
|000049d0| 20 3b 69 66 20 61 6c 6c | 20 34 20 62 79 74 65 73 | ;if all| 4 bytes|
|000049e0| 20 61 72 65 20 74 68 65 | 20 73 61 6d 65 0d 32 30 | are the| same.20|
|000049f0| 43 36 3a 44 30 20 31 38 | 20 20 20 32 30 45 30 20 |C6:D0 18|   20E0 |
|00004a00| 20 31 38 30 20 20 20 20 | 20 20 20 20 20 20 20 62 | 180    |       b|
|00004a10| 6e 65 20 20 20 65 78 69 | 74 32 20 20 20 20 20 20 |ne   exi|t2      |
|00004a20| 20 20 20 3b 74 68 65 6e | 20 4c 43 20 77 61 73 20 |   ;then| LC was |
|00004a30| 6e 65 76 65 72 20 6f 6e | 20 73 6f 0d 32 30 43 38 |never on| so.20C8|
|00004a40| 3a 41 44 20 30 30 20 44 | 30 20 20 20 20 20 20 31 |:AD 00 D|0      1|
|00004a50| 38 31 20 20 20 20 20 20 | 20 20 20 20 20 6c 64 61 |81      |     lda|
|00004a60| 20 20 20 6c 63 32 20 20 | 20 20 20 20 20 20 20 20 |   lc2  |        |
|00004a70| 20 3b 64 6f 20 6e 6f 74 | 68 69 6e 67 0d 32 30 43 | ;do not|hing.20C|
|00004a80| 42 3a 43 44 20 46 32 20 | 32 31 20 20 20 20 20 20 |B:CD F2 |21      |
|00004a90| 31 38 32 20 20 20 20 20 | 20 20 20 20 20 20 63 6d |182     |      cm|
|00004aa0| 70 20 20 20 73 61 76 65 | 2b 31 0d 32 30 43 45 3a |p   save|+1.20CE:|
|00004ab0| 44 30 20 31 30 20 20 20 | 32 30 45 30 20 20 31 38 |D0 10   |20E0  18|
|00004ac0| 33 20 20 20 20 20 20 20 | 20 20 20 20 62 6e 65 20 |3       |    bne |
|00004ad0| 20 20 65 78 69 74 32 0d | 32 30 44 30 3a 41 44 20 |  exit2.|20D0:AD |
|00004ae0| 30 30 20 44 34 20 20 20 | 20 20 20 31 38 34 20 20 |00 D4   |   184  |
|00004af0| 20 20 20 20 20 20 20 20 | 20 6c 64 61 20 20 20 6c |        | lda   l|
|00004b00| 63 33 0d 32 30 44 33 3a | 43 44 20 46 33 20 32 31 |c3.20D3:|CD F3 21|
|00004b10| 20 20 20 20 20 20 31 38 | 35 20 20 20 20 20 20 20 |      18|5       |
|00004b20| 20 20 20 20 63 6d 70 20 | 20 20 73 61 76 65 2b 32 |    cmp |  save+2|
|00004b30| 0d 32 30 44 36 3a 44 30 | 20 30 38 20 20 20 32 30 |.20D6:D0| 08   20|
|00004b40| 45 30 20 20 31 38 36 20 | 20 20 20 20 20 20 20 20 |E0  186 |        |
|00004b50| 20 20 62 6e 65 20 20 20 | 65 78 69 74 32 0d 32 30 |  bne   |exit2.20|
|00004b60| 44 38 3a 41 44 20 30 30 | 20 44 38 20 20 20 20 20 |D8:AD 00| D8     |
|00004b70| 20 31 38 37 20 20 20 20 | 20 20 20 20 20 20 20 6c | 187    |       l|
|00004b80| 64 61 20 20 20 6c 63 34 | 0d 32 30 44 42 3a 43 44 |da   lc4|.20DB:CD|
|00004b90| 20 46 34 20 32 31 20 20 | 20 20 20 20 31 38 38 20 | F4 21  |    188 |
|00004ba0| 20 20 20 20 20 20 20 20 | 20 20 63 6d 70 20 20 20 |        |  cmp   |
|00004bb0| 73 61 76 65 2b 33 0d 32 | 30 44 45 3a 46 30 20 33 |save+3.2|0DE:F0 3|
|00004bc0| 38 20 20 20 32 31 31 38 | 20 20 31 38 39 20 20 20 |8   2118|  189   |
|00004bd0| 20 20 20 20 20 20 20 20 | 62 65 71 20 20 20 65 78 |        |beq   ex|
|00004be0| 69 74 36 0d 32 30 45 30 | 3a 41 44 20 38 38 20 43 |it6.20E0|:AD 88 C|
|00004bf0| 30 20 20 20 20 20 20 31 | 39 30 20 65 78 69 74 32 |0      1|90 exit2|
|00004c00| 20 20 20 20 20 6c 64 61 | 20 20 20 24 43 30 38 38 |     lda|   $C088|
|00004c10| 20 20 20 20 20 20 20 20 | 20 3b 6e 6f 20 6d 61 74 |        | ;no mat|
|00004c20| 63 68 21 20 73 6f 20 74 | 75 72 6e 20 66 69 72 73 |ch! so t|urn firs|
|00004c30| 74 20 4c 43 0d 32 30 45 | 33 3a 41 44 20 30 30 20 |t LC.20E|3:AD 00 |
|00004c40| 45 30 20 20 20 20 20 20 | 31 39 31 20 20 20 20 20 |E0      |191     |
|00004c50| 20 20 20 20 20 20 6c 64 | 61 20 20 20 6c 63 31 20 |      ld|a   lc1 |
|00004c60| 20 20 20 20 20 20 20 20 | 20 20 3b 62 61 6e 6b 20 |        |  ;bank |
|00004c70| 6f 6e 20 61 6e 64 20 63 | 68 65 63 6b 0d 32 30 45 |on and c|heck.20E|
|00004c80| 36 3a 43 44 20 46 31 20 | 32 31 20 20 20 20 20 20 |6:CD F1 |21      |
|00004c90| 31 39 32 20 20 20 20 20 | 20 20 20 20 20 20 63 6d |192     |      cm|
|00004ca0| 70 20 20 20 73 61 76 65 | 0d 32 30 45 39 3a 46 30 |p   save|.20E9:F0|
|00004cb0| 20 30 36 20 20 20 32 30 | 46 31 20 20 31 39 33 20 | 06   20|F1  193 |
|00004cc0| 20 20 20 20 20 20 20 20 | 20 20 62 65 71 20 20 20 |        |  beq   |
|00004cd0| 65 78 69 74 33 0d 32 30 | 45 42 3a 41 44 20 38 30 |exit3.20|EB:AD 80|
|00004ce0| 20 43 30 20 20 20 20 20 | 20 31 39 34 20 20 20 20 | C0     | 194    |
|00004cf0| 20 20 20 20 20 20 20 6c | 64 61 20 20 20 24 43 30 |       l|da   $C0|
|00004d00| 38 30 0d 32 30 45 45 3a | 34 43 20 31 38 20 32 31 |80.20EE:|4C 18 21|
|00004d10| 20 20 20 20 20 20 31 39 | 35 20 20 20 20 20 20 20 |      19|5       |
|00004d20| 20 20 20 20 6a 6d 70 20 | 20 20 65 78 69 74 36 0d |    jmp |  exit6.|
|00004d30| 32 30 46 31 3a 41 44 20 | 30 30 20 44 30 20 20 20 |20F1:AD |00 D0   |
|00004d40| 20 20 20 31 39 36 20 65 | 78 69 74 33 20 20 20 20 |   196 e|xit3    |
|00004d50| 20 6c 64 61 20 20 20 6c | 63 32 0d 32 30 46 34 3a | lda   l|c2.20F4:|
|00004d60| 43 44 20 46 32 20 32 31 | 20 20 20 20 20 20 31 39 |CD F2 21|      19|
|00004d70| 37 20 20 20 20 20 20 20 | 20 20 20 20 63 6d 70 20 |7       |    cmp |
|00004d80| 20 20 73 61 76 65 2b 31 | 20 20 20 20 20 20 20 20 |  save+1|        |
|00004d90| 3b 69 66 20 61 6c 6c 20 | 6c 6f 63 61 74 69 6f 6e |;if all |location|
|00004da0| 73 20 63 68 65 63 6b 0d | 32 30 46 37 3a 46 30 20 |s check.|20F7:F0 |
|00004db0| 30 36 20 20 20 32 30 46 | 46 20 20 31 39 38 20 20 |06   20F|F  198  |
|00004dc0| 20 20 20 20 20 20 20 20 | 20 62 65 71 20 20 20 65 |        | beq   e|
|00004dd0| 78 69 74 34 20 20 20 20 | 20 20 20 20 20 3b 74 68 |xit4    |     ;th|
|00004de0| 65 6e 20 64 6f 20 6d 6f | 72 65 20 6d 6f 72 65 20 |en do mo|re more |
|00004df0| 65 6c 73 65 0d 32 30 46 | 39 3a 41 44 20 38 30 20 |else.20F|9:AD 80 |
|00004e00| 43 30 20 20 20 20 20 20 | 31 39 39 20 20 20 20 20 |C0      |199     |
|00004e10| 20 20 20 20 20 20 6c 64 | 61 20 20 20 24 43 30 38 |      ld|a   $C08|
|00004e20| 30 20 20 20 20 20 20 20 | 20 20 3b 74 75 72 6e 20 |0       |  ;turn |
|00004e30| 6f 6e 20 62 61 6e 6b 20 | 32 0d 32 30 46 43 3a 34 |on bank |2.20FC:4|
|00004e40| 43 20 31 38 20 32 31 20 | 20 20 20 20 20 32 30 30 |C 18 21 |     200|
|00004e50| 20 20 20 20 20 20 20 20 | 20 20 20 6a 6d 70 20 20 |        |   jmp  |
|00004e60| 20 65 78 69 74 36 0d 32 | 30 46 46 3a 41 44 20 30 | exit6.2|0FF:AD 0|
|00004e70| 30 20 44 34 20 20 20 20 | 20 20 32 30 31 20 65 78 |0 D4    |  201 ex|
|00004e80| 69 74 34 20 20 20 20 20 | 6c 64 61 20 20 20 6c 63 |it4     |lda   lc|
|00004e90| 33 20 20 20 20 20 20 20 | 20 20 20 20 3b 63 68 65 |3       |    ;che|
|00004ea0| 63 6b 20 73 65 63 6f 6e | 64 20 62 79 74 65 20 69 |ck secon|d byte i|
|00004eb0| 6e 20 62 61 6e 6b 20 31 | 0d 32 31 30 32 3a 43 44 |n bank 1|.2102:CD|
|00004ec0| 20 46 33 20 32 31 20 20 | 20 20 20 20 32 30 32 20 | F3 21  |    202 |
|00004ed0| 20 20 20 20 20 20 20 20 | 20 20 63 6d 70 20 20 20 |        |  cmp   |
|00004ee0| 73 61 76 65 2b 32 0d 32 | 31 30 35 3a 46 30 20 30 |save+2.2|105:F0 0|
|00004ef0| 36 20 20 20 32 31 30 44 | 20 20 32 30 33 20 20 20 |6   210D|  203   |
|00004f00| 20 20 20 20 20 20 20 20 | 62 65 71 20 20 20 65 78 |        |beq   ex|
|00004f10| 69 74 35 0d 32 31 30 37 | 3a 41 44 20 38 30 20 43 |it5.2107|:AD 80 C|
|00004f20| 30 20 20 20 20 20 20 32 | 30 34 20 20 20 20 20 20 |0      2|04      |
|00004f30| 20 20 20 20 20 6c 64 61 | 20 20 20 24 43 30 38 30 |     lda|   $C080|
|00004f40| 20 20 20 20 20 20 20 20 | 20 3b 73 65 6c 65 63 74 |        | ;select|
|00004f50| 20 62 61 6e 6b 20 32 0d | 32 31 30 41 3a 34 43 20 | bank 2.|210A:4C |
|00004f60| 31 38 20 32 31 20 20 20 | 20 20 20 32 30 35 20 20 |18 21   |   205  |
|00004f70| 20 20 20 20 20 20 20 20 | 20 6a 6d 70 20 20 20 65 |        | jmp   e|
|00004f80| 78 69 74 36 0d 32 31 30 | 44 3a 41 44 20 30 30 20 |xit6.210|D:AD 00 |
|00004f90| 44 38 20 20 20 20 20 20 | 32 30 36 20 65 78 69 74 |D8      |206 exit|
|00004fa0| 35 20 20 20 20 20 6c 64 | 61 20 20 20 6c 63 34 20 |5     ld|a   lc4 |
|00004fb0| 20 20 20 20 20 20 20 20 | 20 20 3b 63 68 65 63 6b |        |  ;check|
|00004fc0| 20 74 68 69 72 64 20 62 | 79 74 65 20 69 6e 20 62 | third b|yte in b|
|00004fd0| 61 6e 6b 20 31 0d 32 31 | 31 30 3a 43 44 20 46 34 |ank 1.21|10:CD F4|
|00004fe0| 20 32 31 20 20 20 20 20 | 20 32 30 37 20 20 20 20 | 21     | 207    |
|00004ff0| 20 20 20 20 20 20 20 63 | 6d 70 20 20 20 73 61 76 |       c|mp   sav|
|00005000| 65 2b 33 0d 32 31 31 33 | 3a 46 30 20 30 33 20 20 |e+3.2113|:F0 03  |
|00005010| 20 32 31 31 38 20 20 32 | 30 38 20 20 20 20 20 20 | 2118  2|08      |
|00005020| 20 20 20 20 20 62 65 71 | 20 20 20 65 78 69 74 36 |     beq|   exit6|
|00005030| 0d 32 31 31 35 3a 41 44 | 20 38 30 20 43 30 20 20 |.2115:AD| 80 C0  |
|00005040| 20 20 20 20 32 30 39 20 | 20 20 20 20 20 20 20 20 |    209 |        |
|00005050| 20 20 6c 64 61 20 20 20 | 24 43 30 38 30 20 20 20 |  lda   |$C080   |
|00005060| 20 20 20 20 20 20 3b 73 | 65 6c 65 63 74 20 62 61 |      ;s|elect ba|
|00005070| 6e 6b 20 32 0d 32 31 31 | 38 3a 32 38 20 20 20 20 |nk 2.211|8:28    |
|00005080| 20 20 20 20 20 20 20 20 | 32 31 30 20 65 78 69 74 |        |210 exit|
|00005090| 36 20 20 20 20 20 70 6c | 70 20 20 20 20 20 20 20 |6     pl|p       |
|000050a0| 20 20 20 20 20 20 20 20 | 20 20 3b 72 65 73 74 6f |        |  ;resto|
|000050b0| 72 65 20 69 6e 74 65 72 | 72 75 70 74 20 73 74 61 |re inter|rupt sta|
|000050c0| 74 75 73 0d 32 31 31 39 | 3a 41 44 20 46 35 20 32 |tus.2119|:AD F5 2|
|000050d0| 31 20 20 20 20 20 20 32 | 31 31 20 20 20 20 20 20 |1      2|11      |
|000050e0| 20 20 20 20 20 6c 64 61 | 20 20 20 73 61 76 65 2b |     lda|   save+|
|000050f0| 34 20 20 20 20 20 20 20 | 20 3b 70 75 74 20 7a 65 |4       | ;put ze|
|00005100| 72 6f 20 70 61 67 65 20 | 62 61 63 6b 0d 32 31 31 |ro page |back.211|
|00005110| 43 3a 38 35 20 30 36 20 | 20 20 20 20 20 20 20 20 |C:85 06 |        |
|00005120| 32 31 32 20 20 20 20 20 | 20 20 20 20 20 20 73 74 |212     |      st|
|00005130| 61 20 20 20 6c 6f 63 61 | 74 69 6f 6e 0d 32 31 31 |a   loca|tion.211|
|00005140| 45 3a 41 44 20 46 36 20 | 32 31 20 20 20 20 20 20 |E:AD F6 |21      |
|00005150| 32 31 33 20 20 20 20 20 | 20 20 20 20 20 20 6c 64 |213     |      ld|
|00005160| 61 20 20 20 73 61 76 65 | 2b 35 20 20 20 20 20 20 |a   save|+5      |
|00005170| 20 20 3b 6c 69 6b 65 20 | 77 65 20 66 6f 75 6e 64 |  ;like |we found|
|00005180| 20 69 74 0d 32 31 32 31 | 3a 38 35 20 30 37 20 20 | it.2121|:85 07  |
|00005190| 20 20 20 20 20 20 20 32 | 31 34 20 20 20 20 20 20 |       2|14      |
|000051a0| 20 20 20 20 20 73 74 61 | 20 20 20 6c 6f 63 61 74 |     sta|   locat|
|000051b0| 69 6f 6e 2b 31 0d 32 31 | 32 33 3a 36 30 20 20 20 |ion+1.21|23:60   |
|000051c0| 20 20 20 20 20 20 20 20 | 20 32 31 35 20 20 20 20 |        | 215    |
|000051d0| 20 20 20 20 20 20 20 72 | 74 73 20 20 20 20 20 20 |       r|ts      |
|000051e0| 20 20 20 20 20 20 20 20 | 20 20 20 3b 61 6e 64 20 |        |   ;and |
|000051f0| 67 6f 20 68 6f 6d 65 2e | 0d 32 31 32 34 3a 20 20 |go home.|.2124:  |
|00005200| 20 20 20 20 20 20 20 20 | 20 20 20 20 32 31 36 20 |        |    216 |
|00005210| 2a 0d 32 31 32 34 3a 41 | 44 20 38 42 20 43 30 20 |*.2124:A|D 8B C0 |
|00005220| 20 20 20 20 20 32 31 37 | 20 65 78 69 74 49 49 20 |     217| exitII |
|00005230| 20 20 20 6c 64 61 20 20 | 20 6c 63 62 61 6e 6b 31 |   lda  | lcbank1|
|00005240| 20 20 20 20 20 20 20 3b | 66 6f 72 63 65 20 69 6e |       ;|force in|
|00005250| 20 6c 61 6e 67 75 61 67 | 65 20 63 61 72 64 0d 32 | languag|e card.2|
|00005260| 31 32 37 3a 41 44 20 38 | 42 20 43 30 20 20 20 20 |127:AD 8|B C0    |
|00005270| 20 20 32 31 38 20 20 20 | 20 20 20 20 20 20 20 20 |  218   |        |
|00005280| 6c 64 61 20 20 20 6c 63 | 62 61 6e 6b 31 20 20 20 |lda   lc|bank1   |
|00005290| 20 20 20 20 3b 62 61 6e | 6b 20 31 0d 32 31 32 41 |    ;ban|k 1.212A|
|000052a0| 3a 41 45 20 30 30 20 44 | 30 20 20 20 20 20 20 32 |:AE 00 D|0      2|
|000052b0| 31 39 20 20 20 20 20 20 | 20 20 20 20 20 6c 64 78 |19      |     ldx|
|000052c0| 20 20 20 6c 63 32 20 20 | 20 20 20 20 20 20 20 20 |   lc2  |        |
|000052d0| 20 3b 73 61 76 65 20 74 | 68 65 20 62 79 74 65 20 | ;save t|he byte |
|000052e0| 74 68 65 72 65 0d 32 31 | 32 44 3a 41 39 20 41 41 |there.21|2D:A9 AA|
|000052f0| 20 20 20 20 20 20 20 20 | 20 32 32 30 20 20 20 20 |        | 220    |
|00005300| 20 20 20 20 20 20 20 6c | 64 61 20 20 20 23 74 65 |       l|da   #te|
|00005310| 73 74 31 20 20 20 20 20 | 20 20 20 3b 75 73 65 20 |st1     |   ;use |
|00005320| 74 68 69 73 20 61 73 20 | 61 20 74 65 73 74 20 62 |this as |a test b|
|00005330| 79 74 65 0d 32 31 32 46 | 3a 38 44 20 30 30 20 44 |yte.212F|:8D 00 D|
|00005340| 30 20 20 20 20 20 20 32 | 32 31 20 20 20 20 20 20 |0      2|21      |
|00005350| 20 20 20 20 20 73 74 61 | 20 20 20 6c 63 32 0d 32 |     sta|   lc2.2|
|00005360| 31 33 32 3a 34 44 20 30 | 30 20 44 30 20 20 20 20 |132:4D 0|0 D0    |
|00005370| 20 20 32 32 32 20 20 20 | 20 20 20 20 20 20 20 20 |  222   |        |
|00005380| 65 6f 72 20 20 20 6c 63 | 32 20 20 20 20 20 20 20 |eor   lc|2       |
|00005390| 20 20 20 20 3b 69 66 20 | 74 68 65 20 73 61 6d 65 |    ;if |the same|
|000053a0| 2c 20 73 68 6f 75 6c 64 | 20 72 65 74 75 72 6e 20 |, should| return |
|000053b0| 7a 65 72 6f 0d 32 31 33 | 35 3a 44 30 20 31 32 20 |zero.213|5:D0 12 |
|000053c0| 20 20 32 31 34 39 20 20 | 32 32 33 20 20 20 20 20 |  2149  |223     |
|000053d0| 20 20 20 20 20 20 62 6e | 65 20 20 20 6e 6f 4c 43 |      bn|e   noLC|
|000053e0| 0d 32 31 33 37 3a 34 45 | 20 30 30 20 44 30 20 20 |.2137:4E| 00 D0  |
|000053f0| 20 20 20 20 32 32 34 20 | 20 20 20 20 20 20 20 20 |    224 |        |
|00005400| 20 20 6c 73 72 20 20 20 | 6c 63 32 20 20 20 20 20 |  lsr   |lc2     |
|00005410| 20 20 20 20 20 20 3b 63 | 68 65 63 6b 20 74 77 69 |      ;c|heck twi|
|00005420| 63 65 20 6a 75 73 74 20 | 74 6f 20 62 65 20 73 75 |ce just |to be su|
|00005430| 72 65 0d 32 31 33 41 3a | 41 39 20 35 35 20 20 20 |re.213A:|A9 55   |
|00005440| 20 20 20 20 20 20 32 32 | 35 20 20 20 20 20 20 20 |      22|5       |
|00005450| 20 20 20 20 6c 64 61 20 | 20 20 23 74 65 73 74 32 |    lda |  #test2|
|00005460| 20 20 20 20 20 20 20 20 | 3b 74 68 69 73 20 69 73 |        |;this is|
|00005470| 20 74 68 65 20 73 68 69 | 66 74 65 64 20 76 61 6c | the shi|fted val|
|00005480| 75 65 0d 32 31 33 43 3a | 34 44 20 30 30 20 44 30 |ue.213C:|4D 00 D0|
|00005490| 20 20 20 20 20 20 32 32 | 36 20 20 20 20 20 20 20 |      22|6       |
|000054a0| 20 20 20 20 65 6f 72 20 | 20 20 6c 63 32 20 20 20 |    eor |  lc2   |
|000054b0| 20 20 20 20 20 20 20 20 | 3b 68 65 72 65 27 73 20 |        |;here's |
|000054c0| 74 68 65 20 73 65 63 6f | 6e 64 20 63 68 65 63 6b |the seco|nd check|
|000054d0| 0d 32 31 33 46 3a 44 30 | 20 30 38 20 20 20 32 31 |.213F:D0| 08   21|
|000054e0| 34 39 20 20 32 32 37 20 | 20 20 20 20 20 20 20 20 |49  227 |        |
|000054f0| 20 20 62 6e 65 20 20 20 | 6e 6f 4c 43 0d 32 31 34 |  bne   |noLC.214|
|00005500| 31 3a 38 45 20 30 30 20 | 44 30 20 20 20 20 20 20 |1:8E 00 |D0      |
|00005510| 32 32 38 20 20 20 20 20 | 20 20 20 20 20 20 73 74 |228     |      st|
|00005520| 78 20 20 20 6c 63 32 20 | 20 20 20 20 20 20 20 20 |x   lc2 |        |
|00005530| 20 20 3b 70 75 74 20 69 | 74 20 62 61 63 6b 21 0d |  ;put i|t back!.|
|00005540| 32 31 34 34 3a 41 39 20 | 34 30 20 20 20 20 20 20 |2144:A9 |40      |
|00005550| 20 20 20 32 32 39 20 20 | 20 20 20 20 20 20 20 20 |   229  |        |
|00005560| 20 6c 64 61 20 20 20 23 | 36 34 20 20 20 20 20 20 | lda   #|64      |
|00005570| 20 20 20 20 20 3b 74 68 | 65 72 65 27 73 20 36 34 |     ;th|ere's 64|
|00005580| 4b 20 68 65 72 65 0d 32 | 31 34 36 3a 34 43 20 42 |K here.2|146:4C B|
|00005590| 44 20 32 30 20 20 20 20 | 20 20 32 33 30 20 20 20 |D 20    |  230   |
|000055a0| 20 20 20 20 20 20 20 20 | 6a 6d 70 20 20 20 65 78 |        |jmp   ex|
|000055b0| 69 74 61 0d 32 31 34 39 | 3a 41 39 20 33 30 20 20 |ita.2149|:A9 30  |
|000055c0| 20 20 20 20 20 20 20 32 | 33 31 20 6e 6f 4c 43 20 |       2|31 noLC |
|000055d0| 20 20 20 20 20 6c 64 61 | 20 20 20 23 34 38 20 20 |     lda|   #48  |
|000055e0| 20 20 20 20 20 20 20 20 | 20 3b 6e 6f 20 72 65 73 |        | ;no res|
|000055f0| 74 6f 72 65 20 2d 20 6e | 6f 20 4c 43 21 0d 32 31 |tore - n|o LC!.21|
|00005600| 34 42 3a 34 43 20 42 44 | 20 32 30 20 20 20 20 20 |4B:4C BD| 20     |
|00005610| 20 32 33 32 20 20 20 20 | 20 20 20 20 20 20 20 6a | 232    |       j|
|00005620| 6d 70 20 20 20 65 78 69 | 74 61 20 20 20 20 20 20 |mp   exi|ta      |
|00005630| 20 20 20 3b 61 6e 64 20 | 67 65 74 20 6f 75 74 20 |   ;and |get out |
|00005640| 6f 66 20 68 65 72 65 0d | 32 31 34 45 3a 20 20 20 |of here.|214E:   |
|00005650| 20 20 20 20 20 20 20 20 | 20 20 20 32 33 33 20 2a |        |   233 *|
|00005660| 0d 32 31 34 45 3a 41 45 | 20 31 41 20 43 30 20 20 |.214E:AE| 1A C0  |
|00005670| 20 20 20 20 32 33 34 20 | 6d 75 63 6b 61 75 78 20 |    234 |muckaux |
|00005680| 20 20 6c 64 78 20 20 20 | 72 64 74 65 78 74 20 20 |  ldx   |rdtext  |
|00005690| 20 20 20 20 20 20 3b 72 | 65 6d 65 6d 62 65 72 20 |      ;r|emember |
|000056a0| 67 72 61 70 68 69 63 73 | 20 69 6e 20 58 0d 32 31 |graphics| in X.21|
|000056b0| 35 31 3a 41 44 20 31 43 | 20 43 30 20 20 20 20 20 |51:AD 1C| C0     |
|000056c0| 20 32 33 35 20 20 20 20 | 20 20 20 20 20 20 20 6c | 235    |       l|
|000056d0| 64 61 20 20 20 72 64 70 | 61 67 65 32 20 20 20 20 |da   rdp|age2    |
|000056e0| 20 20 20 3b 72 65 6d 65 | 6d 62 65 72 20 63 75 72 |   ;reme|mber cur|
|000056f0| 72 65 6e 74 20 76 69 64 | 65 6f 20 64 69 73 70 6c |rent vid|eo displ|
|00005700| 61 79 0d 32 31 35 34 3a | 30 41 20 20 20 20 20 20 |ay.2154:|0A      |
|00005710| 20 20 20 20 20 20 32 33 | 36 20 20 20 20 20 20 20 |      23|6       |
|00005720| 20 20 20 20 61 73 6c 20 | 20 20 41 20 20 20 20 20 |    asl |  A     |
|00005730| 20 20 20 20 20 20 20 20 | 3b 69 6e 20 74 68 65 20 |        |;in the |
|00005740| 63 61 72 72 79 20 62 69 | 74 20 0d 32 31 35 35 3a |carry bi|t .2155:|
|00005750| 41 39 20 38 38 20 20 20 | 20 20 20 20 20 20 32 33 |A9 88   |      23|
|00005760| 37 20 20 20 20 20 20 20 | 20 20 20 20 6c 64 61 20 |7       |    lda |
|00005770| 20 20 23 74 65 73 74 33 | 20 20 20 20 20 20 20 20 |  #test3|        |
|00005780| 3b 61 6e 6f 74 68 65 72 | 20 74 65 73 74 20 63 68 |;another| test ch|
|00005790| 61 72 61 63 74 65 72 0d | 32 31 35 37 3a 32 43 20 |aracter.|2157:2C |
|000057a0| 31 38 20 43 30 20 20 20 | 20 20 20 32 33 38 20 20 |18 C0   |   238  |
|000057b0| 20 20 20 20 20 20 20 20 | 20 62 69 74 20 20 20 72 |        | bit   r|
|000057c0| 64 38 30 63 6f 6c 20 20 | 20 20 20 20 20 3b 72 65 |d80col  |     ;re|
|000057d0| 6d 65 6d 62 65 72 20 76 | 69 64 65 6f 20 6d 6f 64 |member v|ideo mod|
|000057e0| 65 20 69 6e 20 4e 0d 32 | 31 35 41 3a 38 44 20 30 |e in N.2|15A:8D 0|
|000057f0| 31 20 43 30 20 20 20 20 | 20 20 32 33 39 20 20 20 |1 C0    |  239   |
|00005800| 20 20 20 20 20 20 20 20 | 73 74 61 20 20 20 73 65 |        |sta   se|
|00005810| 74 38 30 63 6f 6c 20 20 | 20 20 20 20 3b 65 6e 61 |t80col  |    ;ena|
|00005820| 62 6c 65 20 38 30 2d 63 | 6f 6c 75 6d 6e 20 73 74 |ble 80-c|olumn st|
|00005830| 6f 72 65 0d 32 31 35 44 | 3a 30 38 20 20 20 20 20 |ore.215D|:08     |
|00005840| 20 20 20 20 20 20 20 32 | 34 30 20 20 20 20 20 20 |       2|40      |
|00005850| 20 20 20 20 20 70 68 70 | 20 20 20 20 20 20 20 20 |     php|        |
|00005860| 20 20 20 20 20 20 20 20 | 20 3b 73 61 76 65 20 4e |        | ;save N|
|00005870| 20 61 6e 64 20 43 20 66 | 6c 61 67 73 0d 32 31 35 | and C f|lags.215|
|00005880| 45 3a 38 44 20 35 35 20 | 43 30 20 20 20 20 20 20 |E:8D 55 |C0      |
|00005890| 32 34 31 20 20 20 20 20 | 20 20 20 20 20 20 73 74 |241     |      st|
|000058a0| 61 20 20 20 74 78 74 70 | 61 67 65 32 20 20 20 20 |a   txtp|age2    |
|000058b0| 20 20 3b 73 65 74 20 70 | 61 67 65 20 74 77 6f 0d |  ;set p|age two.|
|000058c0| 32 31 36 31 3a 38 44 20 | 35 31 20 43 30 20 20 20 |2161:8D |51 C0   |
|000058d0| 20 20 20 32 34 32 20 20 | 20 20 20 20 20 20 20 20 |   242  |        |
|000058e0| 20 73 74 61 20 20 20 74 | 78 74 73 65 74 20 20 20 | sta   t|xtset   |
|000058f0| 20 20 20 20 20 3b 73 65 | 74 20 74 65 78 74 0d 32 |     ;se|t text.2|
|00005900| 31 36 34 3a 41 43 20 30 | 30 20 30 34 20 20 20 20 |164:AC 0|0 04    |
|00005910| 20 20 32 34 33 20 20 20 | 20 20 20 20 20 20 20 20 |  243   |        |
|00005920| 6c 64 79 20 20 20 62 65 | 67 70 61 67 65 31 20 20 |ldy   be|gpage1  |
|00005930| 20 20 20 20 3b 73 61 76 | 65 20 66 69 72 73 74 20 |    ;sav|e first |
|00005940| 63 68 61 72 61 63 74 65 | 72 0d 32 31 36 37 3a 38 |characte|r.2167:8|
|00005950| 44 20 30 30 20 30 34 20 | 20 20 20 20 20 32 34 34 |D 00 04 |     244|
|00005960| 20 20 20 20 20 20 20 20 | 20 20 20 73 74 61 20 20 |        |   sta  |
|00005970| 20 62 65 67 70 61 67 65 | 31 20 20 20 20 20 20 3b | begpage|1      ;|
|00005980| 61 6e 64 20 72 65 70 6c | 61 63 65 20 69 74 20 77 |and repl|ace it w|
|00005990| 69 74 68 20 74 65 73 74 | 20 63 68 61 72 61 63 74 |ith test| charact|
|000059a0| 65 72 0d 32 31 36 41 3a | 41 44 20 30 30 20 30 34 |er.216A:|AD 00 04|
|000059b0| 20 20 20 20 20 20 32 34 | 35 20 20 20 20 20 20 20 |      24|5       |
|000059c0| 20 20 20 20 6c 64 61 20 | 20 20 62 65 67 70 61 67 |    lda |  begpag|
|000059d0| 65 31 20 20 20 20 20 20 | 3b 67 65 74 20 69 74 20 |e1      |;get it |
|000059e0| 62 61 63 6b 0d 32 31 36 | 44 3a 38 43 20 30 30 20 |back.216|D:8C 00 |
|000059f0| 30 34 20 20 20 20 20 20 | 32 34 36 20 20 20 20 20 |04      |246     |
|00005a00| 20 20 20 20 20 20 73 74 | 79 20 20 20 62 65 67 70 |      st|y   begp|
|00005a10| 61 67 65 31 20 20 20 20 | 20 20 3b 61 6e 64 20 70 |age1    |  ;and p|
|00005a20| 75 74 20 62 61 63 6b 20 | 77 68 61 74 20 77 61 73 |ut back |what was|
|00005a30| 20 74 68 65 72 65 0d 32 | 31 37 30 3a 32 38 20 20 | there.2|170:28  |
|00005a40| 20 20 20 20 20 20 20 20 | 20 20 32 34 37 20 20 20 |        |  247   |
|00005a50| 20 20 20 20 20 20 20 20 | 70 6c 70 0d 32 31 37 31 |        |plp.2171|
|00005a60| 3a 42 30 20 30 38 20 20 | 20 32 31 37 42 20 20 32 |:B0 08  | 217B  2|
|00005a70| 34 38 20 20 20 20 20 20 | 20 20 20 20 20 62 63 73 |48      |     bcs|
|00005a80| 20 20 20 6d 75 63 6b 32 | 20 20 20 20 20 20 20 20 |   muck2|        |
|00005a90| 20 3b 73 74 61 79 20 69 | 6e 20 70 61 67 65 20 32 | ;stay i|n page 2|
|00005aa0| 0d 32 31 37 33 3a 38 44 | 20 35 34 20 43 30 20 20 |.2173:8D| 54 C0  |
|00005ab0| 20 20 20 20 32 34 39 20 | 20 20 20 20 20 20 20 20 |    249 |        |
|00005ac0| 20 20 73 74 61 20 20 20 | 74 78 74 70 61 67 65 31 |  sta   |txtpage1|
|00005ad0| 20 20 20 20 20 20 3b 72 | 65 73 74 6f 72 65 20 70 |      ;r|estore p|
|00005ae0| 61 67 65 20 31 0d 32 31 | 37 36 3a 33 30 20 30 33 |age 1.21|76:30 03|
|00005af0| 20 20 20 32 31 37 42 20 | 20 32 35 30 20 6d 75 63 |   217B | 250 muc|
|00005b00| 6b 31 20 20 20 20 20 62 | 6d 69 20 20 20 6d 75 63 |k1     b|mi   muc|
|00005b10| 6b 32 20 20 20 20 20 20 | 20 20 20 3b 73 74 61 79 |k2      |   ;stay|
|00005b20| 20 69 6e 20 38 30 2d 63 | 6f 6c 75 6d 6e 73 0d 32 | in 80-c|olumns.2|
|00005b30| 31 37 38 3a 38 44 20 30 | 30 20 43 30 20 20 20 20 |178:8D 0|0 C0    |
|00005b40| 20 20 32 35 31 20 20 20 | 20 20 20 20 20 20 20 20 |  251   |        |
|00005b50| 73 74 61 20 20 20 24 63 | 30 30 30 20 20 20 20 20 |sta   $c|000     |
|00005b60| 20 20 20 20 3b 74 75 72 | 6e 20 6f 66 66 20 38 30 |    ;tur|n off 80|
|00005b70| 2d 63 6f 6c 75 6d 6e 73 | 0d 32 31 37 42 3a 41 38 |-columns|.217B:A8|
|00005b80| 20 20 20 20 20 20 20 20 | 20 20 20 20 32 35 32 20 |        |    252 |
|00005b90| 6d 75 63 6b 32 20 20 20 | 20 20 74 61 79 20 20 20 |muck2   |  tay   |
|00005ba0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 73 |        |      ;s|
|00005bb0| 61 76 65 20 72 65 74 75 | 72 6e 65 64 20 63 68 61 |ave retu|rned cha|
|00005bc0| 72 61 63 74 65 72 0d 32 | 31 37 43 3a 38 41 20 20 |racter.2|17C:8A  |
|00005bd0| 20 20 20 20 20 20 20 20 | 20 20 32 35 33 20 20 20 |        |  253   |
|00005be0| 20 20 20 20 20 20 20 20 | 74 78 61 20 20 20 20 20 |        |txa     |
|00005bf0| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 67 65 74 |        |    ;get|
|00005c00| 20 67 72 61 70 68 69 63 | 73 2f 74 65 78 74 20 73 | graphic|s/text s|
|00005c10| 65 74 74 69 6e 67 0d 32 | 31 37 44 3a 33 30 20 30 |etting.2|17D:30 0|
|00005c20| 33 20 20 20 32 31 38 32 | 20 20 32 35 34 20 20 20 |3   2182|  254   |
|00005c30| 20 20 20 20 20 20 20 20 | 62 6d 69 20 20 20 6d 75 |        |bmi   mu|
|00005c40| 63 6b 33 0d 32 31 37 46 | 3a 38 44 20 35 30 20 43 |ck3.217F|:8D 50 C|
|00005c50| 30 20 20 20 20 20 20 32 | 35 35 20 20 20 20 20 20 |0      2|55      |
|00005c60| 20 20 20 20 20 73 74 61 | 20 20 20 74 78 74 63 6c |     sta|   txtcl|
|00005c70| 72 20 20 20 20 20 20 20 | 20 3b 74 75 72 6e 20 67 |r       | ;turn g|
|00005c80| 72 61 70 68 69 63 73 20 | 62 61 63 6b 20 6f 6e 0d |raphics |back on.|
|00005c90| 32 31 38 32 3a 43 30 20 | 38 38 20 20 20 20 20 20 |2182:C0 |88      |
|00005ca0| 20 20 20 32 35 36 20 6d | 75 63 6b 33 20 20 20 20 |   256 m|uck3    |
|00005cb0| 20 63 70 79 20 20 20 23 | 74 65 73 74 33 20 20 20 | cpy   #|test3   |
|00005cc0| 20 20 20 20 20 3b 66 69 | 6e 61 6c 6c 79 20 63 6f |     ;fi|nally co|
|00005cd0| 6d 70 61 72 65 20 69 74 | 0d 32 31 38 34 3a 44 30 |mpare it|.2184:D0|
|00005ce0| 20 32 46 20 20 20 32 31 | 42 35 20 20 32 35 37 20 | 2F   21|B5  257 |
|00005cf0| 20 20 20 20 20 20 20 20 | 20 20 62 6e 65 20 20 20 |        |  bne   |
|00005d00| 6e 6f 63 61 72 64 20 20 | 20 20 20 20 20 20 3b 6e |nocard  |      ;n|
|00005d10| 6f 20 38 30 2d 63 6f 6c | 75 6d 6e 20 63 61 72 64 |o 80-col|umn card|
|00005d20| 21 0d 32 31 38 36 3a 41 | 44 20 31 33 20 43 30 20 |!.2186:A|D 13 C0 |
|00005d30| 20 20 20 20 20 32 35 38 | 20 20 20 20 20 20 20 20 |     258|        |
|00005d40| 20 20 20 6c 64 61 20 20 | 20 72 64 72 61 6d 72 64 |   lda  | rdramrd|
|00005d50| 20 20 20 20 20 20 20 3b | 69 73 20 61 75 78 20 6d |       ;|is aux m|
|00005d60| 65 6d 6f 72 79 20 62 65 | 69 6e 67 20 72 65 61 64 |emory be|ing read|
|00005d70| 3f 0d 32 31 38 39 3a 33 | 30 20 32 46 20 20 20 32 |?.2189:3|0 2F   2|
|00005d80| 31 42 41 20 20 32 35 39 | 20 20 20 20 20 20 20 20 |1BA  259|        |
|00005d90| 20 20 20 62 6d 69 20 20 | 20 6d 75 63 6b 31 32 38 |   bmi  | muck128|
|00005da0| 20 20 20 20 20 20 20 3b | 79 75 70 2c 20 74 68 65 |       ;|yup, the|
|00005db0| 72 65 27 73 20 31 32 38 | 4b 21 0d 32 31 38 42 3a |re's 128|K!.218B:|
|00005dc0| 41 44 20 31 36 20 43 30 | 20 20 20 20 20 20 32 36 |AD 16 C0|      26|
|00005dd0| 30 20 20 20 20 20 20 20 | 20 20 20 20 6c 64 61 20 |0       |    lda |
|00005de0| 20 20 72 64 61 6c 74 7a | 70 20 20 20 20 20 20 20 |  rdaltz|p       |
|00005df0| 3b 69 73 20 61 75 78 20 | 7a 65 72 6f 20 70 61 67 |;is aux |zero pag|
|00005e00| 65 20 75 73 65 64 3f 0d | 32 31 38 45 3a 33 30 20 |e used?.|218E:30 |
|00005e10| 32 41 20 20 20 32 31 42 | 41 20 20 32 36 31 20 20 |2A   21B|A  261  |
|00005e20| 20 20 20 20 20 20 20 20 | 20 62 6d 69 20 20 20 6d |        | bmi   m|
|00005e30| 75 63 6b 31 32 38 20 20 | 20 20 20 20 20 3b 79 75 |uck128  |     ;yu|
|00005e40| 70 21 0d 32 31 39 30 3a | 41 30 20 32 41 20 20 20 |p!.2190:|A0 2A   |
|00005e50| 20 20 20 20 20 20 32 36 | 32 20 20 20 20 20 20 20 |      26|2       |
|00005e60| 20 20 20 20 6c 64 79 20 | 20 20 23 64 6f 6e 65 2d |    ldy |  #done-|
|00005e70| 73 74 61 72 74 0d 32 31 | 39 32 3a 42 45 20 42 43 |start.21|92:BE BC|
|00005e80| 20 32 31 20 20 20 20 20 | 20 32 36 33 20 6d 6f 76 | 21     | 263 mov|
|00005e90| 65 20 20 20 20 20 20 6c | 64 78 20 20 20 73 74 61 |e      l|dx   sta|
|00005ea0| 72 74 2d 31 2c 79 20 20 | 20 20 20 3b 73 77 61 70 |rt-1,y  |   ;swap|
|00005eb0| 20 73 65 63 74 69 6f 6e | 20 6f 66 20 7a 65 72 6f | section| of zero|
|00005ec0| 20 70 61 67 65 0d 32 31 | 39 35 3a 42 39 20 30 30 | page.21|95:B9 00|
|00005ed0| 20 30 30 20 20 20 20 20 | 20 32 36 34 20 20 20 20 | 00     | 264    |
|00005ee0| 20 20 20 20 20 20 20 6c | 64 61 20 20 20 73 61 66 |       l|da   saf|
|00005ef0| 65 2d 31 2c 79 20 20 20 | 20 20 20 3b 63 6f 64 65 |e-1,y   |   ;code|
|00005f00| 20 6e 65 65 64 69 6e 67 | 73 20 73 61 66 65 20 6c | needing|s safe l|
|00005f10| 6f 63 61 74 69 6f 6e 20 | 64 75 72 69 6e 67 0d 32 |ocation |during.2|
|00005f20| 31 39 38 3a 39 36 20 30 | 30 20 20 20 20 20 20 20 |198:96 0|0       |
|00005f30| 20 20 32 36 35 20 20 20 | 20 20 20 20 20 20 20 20 |  265   |        |
|00005f40| 73 74 78 20 20 20 73 61 | 66 65 2d 31 2c 79 20 20 |stx   sa|fe-1,y  |
|00005f50| 20 20 20 20 3b 72 65 61 | 64 69 6e 67 20 6f 66 20 |    ;rea|ding of |
|00005f60| 61 75 78 20 6d 65 6d 0d | 32 31 39 41 3a 39 39 20 |aux mem.|219A:99 |
|00005f70| 42 43 20 32 31 20 20 20 | 20 20 20 32 36 36 20 20 |BC 21   |   266  |
|00005f80| 20 20 20 20 20 20 20 20 | 20 73 74 61 20 20 20 73 |        | sta   s|
|00005f90| 74 61 72 74 2d 31 2c 59 | 0d 32 31 39 44 3a 38 38 |tart-1,Y|.219D:88|
|00005fa0| 20 20 20 20 20 20 20 20 | 20 20 20 20 32 36 37 20 |        |    267 |
|00005fb0| 20 20 20 20 20 20 20 20 | 20 20 64 65 79 0d 32 31 |        |  dey.21|
|00005fc0| 39 45 3a 44 30 20 46 32 | 20 20 20 32 31 39 32 20 |9E:D0 F2|   2192 |
|00005fd0| 20 32 36 38 20 20 20 20 | 20 20 20 20 20 20 20 62 | 268    |       b|
|00005fe0| 6e 65 20 20 20 6d 6f 76 | 65 0d 32 31 41 30 3a 34 |ne   mov|e.21A0:4|
|00005ff0| 43 20 30 31 20 30 30 20 | 20 20 20 20 20 32 36 39 |C 01 00 |     269|
|00006000| 20 20 20 20 20 20 20 20 | 20 20 20 6a 6d 70 20 20 |        |   jmp  |
|00006010| 20 73 61 66 65 20 20 20 | 20 20 20 20 20 20 20 3b | safe   |       ;|
|00006020| 6a 75 6d 70 20 74 6f 20 | 73 61 66 65 20 67 72 6f |jump to |safe gro|
|00006030| 75 6e 64 0d 32 31 41 33 | 3a 30 38 20 20 20 20 20 |und.21A3|:08     |
|00006040| 20 20 20 20 20 20 20 32 | 37 30 20 62 61 63 6b 20 |       2|70 back |
|00006050| 20 20 20 20 20 70 68 70 | 20 20 20 20 20 20 20 20 |     php|        |
|00006060| 20 20 20 20 20 20 20 20 | 20 3b 73 61 76 65 20 73 |        | ;save s|
|00006070| 74 61 74 75 73 0d 32 31 | 41 34 3a 41 30 20 32 41 |tatus.21|A4:A0 2A|
|00006080| 20 20 20 20 20 20 20 20 | 20 32 37 31 20 20 20 20 |        | 271    |
|00006090| 20 20 20 20 20 20 20 6c | 64 79 20 20 20 23 64 6f |       l|dy   #do|
|000060a0| 6e 65 2d 73 74 61 72 74 | 20 20 20 3b 6d 6f 76 65 |ne-start|   ;move|
|000060b0| 20 7a 65 72 6f 20 70 61 | 67 65 20 62 61 63 6b 0d | zero pa|ge back.|
|000060c0| 32 31 41 36 3a 42 39 20 | 42 43 20 32 31 20 20 20 |21A6:B9 |BC 21   |
|000060d0| 20 20 20 32 37 32 20 6d | 6f 76 65 32 20 20 20 20 |   272 m|ove2    |
|000060e0| 20 6c 64 61 20 20 20 73 | 74 61 72 74 2d 31 2c 79 | lda   s|tart-1,y|
|000060f0| 0d 32 31 41 39 3a 39 39 | 20 30 30 20 30 30 20 20 |.21A9:99| 00 00  |
|00006100| 20 20 20 20 32 37 33 20 | 20 20 20 20 20 20 20 20 |    273 |        |
|00006110| 20 20 73 74 61 20 20 20 | 73 61 66 65 2d 31 2c 79 |  sta   |safe-1,y|
|00006120| 0d 32 31 41 43 3a 38 38 | 20 20 20 20 20 20 20 20 |.21AC:88|        |
|00006130| 20 20 20 20 32 37 34 20 | 20 20 20 20 20 20 20 20 |    274 |        |
|00006140| 20 20 64 65 79 0d 32 31 | 41 44 3a 44 30 20 46 37 |  dey.21|AD:D0 F7|
|00006150| 20 20 20 32 31 41 36 20 | 20 32 37 35 20 20 20 20 |   21A6 | 275    |
|00006160| 20 20 20 20 20 20 20 62 | 6e 65 20 20 20 6d 6f 76 |       b|ne   mov|
|00006170| 65 32 0d 32 31 41 46 3a | 36 38 20 20 20 20 20 20 |e2.21AF:|68      |
|00006180| 20 20 20 20 20 20 32 37 | 36 20 20 20 20 20 20 20 |      27|6       |
|00006190| 20 20 20 20 70 6c 61 0d | 32 31 42 30 3a 42 30 20 |    pla.|21B0:B0 |
|000061a0| 30 33 20 20 20 32 31 42 | 35 20 20 32 37 37 20 20 |03   21B|5  277  |
|000061b0| 20 20 20 20 20 20 20 20 | 20 62 63 73 20 20 20 6e |        | bcs   n|
|000061c0| 6f 61 75 78 0d 32 31 42 | 32 3a 34 43 20 42 41 20 |oaux.21B|2:4C BA |
|000061d0| 32 31 20 20 20 20 20 20 | 32 37 38 20 69 73 61 75 |21      |278 isau|
|000061e0| 78 20 20 20 20 20 6a 6d | 70 20 20 20 6d 75 63 6b |x     jm|p   muck|
|000061f0| 31 32 38 20 20 20 20 20 | 20 20 3b 74 68 65 72 65 |128     |  ;there|
|00006200| 20 69 73 20 31 32 38 4b | 0d 32 31 42 35 3a 20 20 | is 128K|.21B5:  |
|00006210| 20 20 20 20 20 20 20 20 | 20 20 20 20 32 37 39 20 |        |    279 |
|00006220| 2a 0d 32 31 42 35 3a 20 | 20 20 20 20 20 20 20 20 |*.21B5: |        |
|00006230| 20 20 20 20 20 32 38 30 | 20 2a 20 20 59 6f 75 20 |     280| *  You |
|00006240| 63 61 6e 20 70 75 74 20 | 79 6f 75 72 20 6f 77 6e |can put |your own|
|00006250| 20 72 6f 75 74 69 6e 65 | 20 61 74 20 22 6e 6f 61 | routine| at "noa|
|00006260| 75 78 22 20 69 66 20 79 | 6f 75 20 77 69 73 68 20 |ux" if y|ou wish |
|00006270| 74 6f 0d 32 31 42 35 3a | 20 20 20 20 20 20 20 20 |to.21B5:|        |
|00006280| 20 20 20 20 20 20 32 38 | 31 20 2a 20 20 64 69 73 |      28|1 *  dis|
|00006290| 74 69 6e 67 75 69 73 68 | 20 62 65 74 77 65 65 6e |tinguish| between|
|000062a0| 20 36 34 4b 20 77 69 74 | 68 6f 75 74 20 61 6e 20 | 64K wit|hout an |
|000062b0| 38 30 2d 63 6f 6c 75 6d | 6e 20 63 61 72 64 20 61 |80-colum|n card a|
|000062c0| 6e 64 0d 32 31 42 35 3a | 20 20 20 20 20 20 20 20 |nd.21B5:|        |
|000062d0| 20 20 20 20 20 20 32 38 | 32 20 2a 20 20 36 34 4b |      28|2 *  64K|
|000062e0| 20 77 69 74 68 20 61 6e | 20 38 30 2d 63 6f 6c 75 | with an| 80-colu|
|000062f0| 6d 6e 20 63 61 72 64 2e | 0d 32 31 42 35 3a 20 20 |mn card.|.21B5:  |
|00006300| 20 20 20 20 20 20 20 20 | 20 20 20 20 32 38 33 20 |        |    283 |
|00006310| 2a 0d 32 31 42 35 3a 20 | 20 20 20 20 20 20 20 32 |*.21B5: |       2|
|00006320| 31 42 35 20 20 32 38 34 | 20 6e 6f 61 75 78 20 20 |1B5  284| noaux  |
|00006330| 20 20 20 65 71 75 20 20 | 20 2a 0d 32 31 42 35 3a |   equ  | *.21B5:|
|00006340| 41 39 20 34 30 20 20 20 | 20 20 20 20 20 20 32 38 |A9 40   |      28|
|00006350| 35 20 6e 6f 63 61 72 64 | 20 20 20 20 6c 64 61 20 |5 nocard|    lda |
|00006360| 20 20 23 36 34 20 20 20 | 20 20 20 20 20 20 20 20 |  #64   |        |
|00006370| 3b 6f 6e 6c 79 20 36 34 | 4b 0d 32 31 42 37 3a 34 |;only 64|K.21B7:4|
|00006380| 43 20 42 44 20 32 30 20 | 20 20 20 20 20 32 38 36 |C BD 20 |     286|
|00006390| 20 20 20 20 20 20 20 20 | 20 20 20 6a 6d 70 20 20 |        |   jmp  |
|000063a0| 20 65 78 69 74 61 0d 32 | 31 42 41 3a 34 43 20 42 | exita.2|1BA:4C B|
|000063b0| 42 20 32 30 20 20 20 20 | 20 20 32 38 37 20 6d 75 |B 20    |  287 mu|
|000063c0| 63 6b 31 32 38 20 20 20 | 6a 6d 70 20 20 20 65 78 |ck128   |jmp   ex|
|000063d0| 69 74 31 32 38 20 20 20 | 20 20 20 20 3b 74 68 65 |it128   |    ;the|
|000063e0| 72 65 27 73 20 31 32 38 | 4b 0d 32 31 42 44 3a 20 |re's 128|K.21BD: |
|000063f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 32 38 38 |        |     288|
+--------+-------------------------+-------------------------+--------+--------+
Only 25.0 KB of data is shown above.